Написать программу которая 10 раз выводит на экран Имя и Фамилию. использование цыкл while
Написать программу которая 10 раз выводит на экран Имя и Фамилию. использование цыкл while
Гость
Ответ(ы) на вопрос:
Гостьprogram llllllllll;
var a, b :string;
c:integer;
begin
writeln('Введите имя');
readln(a);
writeln('Введите фамилию');
readln(b);
c:=10;
while c>0 do
begin
write(a,' ');
writeln(b);
c:=c-1;
end;
end.
Не нашли ответ?
Похожие вопросы