Напишите программу,которая пишет имя 20 раз
Напишите программу,которая пишет имя 20 раз
Гость
Ответ(ы) на вопрос:
Гость Var fm, im: string;
i: integer;
begin
readln(фамилия, имя);
for i:= 1 to 20 do
writeln(имя,' ', фамилия);
readln;
end.
Не нашли ответ?
Похожие вопросы