Предмет: Информатика,
автор: masha2341532
Составьте программу,которая задает пользователю вопрос,требующий однозначного ответа;предлагает пользователю несколько подсказок и попыток.Если он угадал,то спрашивает его имя и выводит на экран поздравление,являющееся конкатенацией нескольких строк,дважды употребив его имя.
Ответы
Автор ответа:
0
var a,d:integer;
begin
write ('Введите число: ');
readln (a);
write ('d,' ');
for d:=2 to (a div 2) do
if a mod d=0 then (write (d,' ');
write (a);
end.
begin
write ('Введите число: ');
readln (a);
write ('d,' ');
for d:=2 to (a div 2) do
if a mod d=0 then (write (d,' ');
write (a);
end.
Интересные вопросы
Предмет: Русский язык,
автор: cirem
Предмет: Математика,
автор: Allhiaeaa
Предмет: Психология,
автор: ulianna9173
Предмет: Алгебра,
автор: nikalun98