Фотографии - графическая
письма - текстовая, числовая, графическая
школьный журнал - текстовая, числовая
Var k,i:integer;
begin
write ('Введите количество повторений: ');
readln (k);
for i:=1 to k do
writeln ('ПРИВЕТ!!!')
end.
Скину ответ через 10 минут ;)))))
Алг
нач
лит s
ввод s
нц 5 раз
вывод s+' ';
кц
кон