profile
Опубликовано 6 лет назад по предмету Информатика от masha2341532

Составьте программу,которая загадывает пользователю загадку и дает ему три попытки отгадать ее.Работа программы сопровождается диалогом с пользователем.Желательно применить конкатенацию введенных строк.

  1. Ответ
    Ответ дан denprof33
    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.
Самые новые вопросы