Ответ(ы) на вопрос:
program one;
uses crt;
var
a,b: integer;
begin
writeln('введите число');
read(b);
for a:=1 to 10 do
writeln('произведение =',a*b);
end.
Не нашли ответ?
Похожие вопросы