ОЧЕНЬ СРОЧНО!! Составьте таблицу умножения на число n. (цикл с параметром)
ОЧЕНЬ СРОЧНО!! Составьте таблицу умножения на число n. (цикл с параметром)
Гость
Ответ(ы) на вопрос:
Гостьprogram tablica;
uses crt;
var a,b,c : integer;
begin
Writeln('Таблица умножения');
write('Введите число ');
Readln(a);
for b:=1 to 10 do
begin
c:=a*b;
Writeln(a,'*',b,'=',c);
end;
end.
Не нашли ответ?
Похожие вопросы