Определить два наибольших числа в последовательности и найти их частное.Не через массивы. Паскаль.
Ответы:
15-03-2016 00:24
var max, prev_max, n: integer;begin max := -10000; prev_max := -10000; repeat read(n); if n > max then begin prev_max := max; max := n; end; until n = 0; writeln(max, , prev_max, , prev_max / max);end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Определить два наибольших числа в последовательности и найти их частное.Не через массивы. Паскаль.» от пользователя Румия Коврижных в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!