Информатика, опубликовано 2018-08-22 22:20:55 by Гость
Напечатать таблицу умножения В ПаскалеНапечатать таблицу умножения для чисел 12,13,14.Все данные расположите в несколько столбцов так,чтобы они были видны на экране
Ответ оставил Гость
Program asd;
USES crt;
Const n=12;
n1=13;
n3=14;
m=9;
Var i:integer;
BEGIN
For i:=1 to m do begin
Write(n, * ,i, = ,n*i,:5);
Write(n1, * ,i, = ,n1*i,:5);
Writeln(n3, * ,i, = ,n3*i);
end;
END.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.