Задание 10 Параграф 4.5 ГДЗ Босова 8 класс 2023 (Информатика)
var
st: string;
i: byte;
begin
write(‘Имя и фамилия > > ‘);
readln(st);
for i := 1 to 10 do
writeln(st)
end.
Окно вывода
Имя и фамилия > > Петя Петров
Петя Петров
Петя Петров
Петя Петров
Петя Петров
Петя Петров
Петя Петров
Петя Петров
Петя Петров
Петя Петров
Петя Петров
Чтобы вывести имя и фамилию 10 раз, удобно сначала считать строку с клавиатуры, а затем использовать цикл for, который выполнится 10 раз.
var
st: string;
i: byte;
begin
write(‘Имя и фамилия >> ‘);
readln(st);
for i := 1 to 10 do
writeln(st);
end.
Программа запрашивает имя и фамилию, сохраняет их в переменной st и затем 10 раз выводит это значение на экран.
Ответ
Программа на Pascal:
var
st: string;
i: byte;
begin
write(‘Имя и фамилия >> ‘);
readln(st);
for i := 1 to 10 do
writeln(st);
end.