Напишите программу для pascal (найти больше число - вопрос №931367735151 от sofiakuznetsova2004 03.04.2020 19:36

Question

Информатика: Напишите программу для pascal (найти больше число из 3) для чисел 5 1 5 1 2 4 4 4 1 5 5 5 4 2 5 2 5 4

sofiakuznetsova2004 · Answer

// PascalABC.NET 3.4.2, сборка 1797 от 22.09.2018// Внимание! Если программа не работает, обновите версию!

begin

loop 6 do

ReadSeqInteger('==>',3).Max.Println

end.