Регистрация
Арбузярик
07.07.2020 17:01
Информатика
Есть ответ 👍

Найти максимальное натуральное число меньше 5000, которое делится нацело на 39.

240
485
Посмотреть ответы 2

Ответы на вопрос:

turdalievab
turdalievab
4,7(81 оценок)
Var a,b: integer; begin for a: =1 to 4999 do begin if (a mod 39=0) then b: =a; end; writeln(b); end.ответ: число 4992
Nastya4002
Nastya4002
4,5(96 оценок)

var masiv: array[1..10000] of longint; i: longint;

begin

    (n = konetz massiva)

    for i: =1 to n do

        if masiv[i]=> 100 then

              begin

                    masiv[i]: =round(masiv[i]/100);

                    write(masiv[i],' m | ');

              end else

              begin

                  write(masiv[i],' cm | ');

              end;

readln;

end;

 

Популярно: Информатика