Напишите программу, которая вычисляет среднее арифметическое массива из 10 элементов. На паскале

154

335

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

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

саша4265

Информатика

4,6(34 оценок)

Var commands: array [1..2] of byte; buf: string; begin writeln('формат ввода: (№ комманды)(пробел)(очки)'); writeln('например: 1 3'); writeln('№ о'); repeat readln(buf); if buf = '0' then break; commands[integer.parse(buf[1])] += byte.parse(buf[3]); until false; writeln(string.format('команда {0} победила во счётом {1} очк.', commands[1] > commands[2] ? 1 : 2, max(commands[1], ; end.