Напишите программу, которая 10 раз выводит на экран ваши имя и фамилию с помощью while, repeat
Ответ:
program SomeNameHere;
var
i: integer;
fullname: string;
begin
Write('Введите ваше полное имя: ');ReadLn(fullname);
i := 0;
while i < 10 do begin
WriteLn(fullname);i := i + 1;
end;
end.
Объяснение: