Регистрация
Nikakrmararle
14.09.2020 13:44
Информатика
Есть ответ 👍

МОВА PYTHONвивести всі числа на проміжку [10,20​

158
357
Посмотреть ответы 1

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

daniilkartel
daniilkartel
4,4(76 оценок)

var temp,max,max2: integer;

begin

    readln(temp);

    max: =0;

    max2: =0;

    while (temp< > 0) do begin

      if(temp> max) then begin max2: =max; max: =temp; end

          else if(temp> max2) then max2: =temp;

      readln(temp);

    end;

    writeln(max*max2)

end.

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