Repeat - Pascal
Формулировка задачи:
1.Найти все натуральные числа от 1 до 100,кратные 3.
2.Запросить имя пользователя и напечатать ‘Привет, Вася!’ 10 раз(если Вася –имя пользователя).
Решение задачи: «Repeat»
textual
Листинг программы
var
username:string;
begin
readln(username);
for i:=1 to 10 do
writeln('hello,',username,'!');
end.
Объяснение кода листинга программы
В данном коде:
- Объявлена переменная username типа string.
- Пользователю предлагается ввести значение переменной username с помощью функции readln().
- Затем, с помощью цикла for, выводится на экран 10 раз сообщение
hello,& username &!. - В конце программы стоит ключевое слово end., обозначающее конец программы.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д