Группа из 25 человек сдало экзамен, определить средний балл. Составить программу на языке Паскаль.
10-11 класс
|
summa := 0;
for counter = 1 To 25 Do
begin
Readln(ball);
summa := summa + a;
end;
writeln(summa/25)
Бегины, энды и косметические изменения сможете, я думаю, ввести сами. Учтите, что summa на 146% будет не целое, то бишь float
Другие вопросы из категории
1.копирование фрагментов текста
2.исправление опечаток
3.проверка орфографии
4.изменение размера полей
5.перемещение фрагментов текста
Читайте также
чисел найти количество элементов равных 3. 3)В массиве из 8 целых найти номер массива с наибольшим значением. 4)В массиве из 12 целых чисел найти количество и сумму элементов, расположенных до максимального элемента. 5)Для массива из 15 вещественных подсчитать количество элементов массива меньших суммы первого и последнего элементов массива.
2)Найти количество всех нечетных чисел на интервале от 11 до 20
3)Найти сумму целых положительных четных чисел на интервале от 1 до 100
4)Найти сумму ряда,общий член которого равен А(х)=1/(3*N-2)*(3*N+1)
5)Дано произвольное число n≤100.Определить количество цифр в числе
ОЧЕНЬ НУЖНО!!НА ЯЗЫКЕ ПАСКАЛЬ!ВЫРУЧАЙТЕ!
СОСТАВИТЬ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ
данны два числа a и b.составить программу для вычисления среднего арифметического кубоы этих чисел
значение Х с соответствующим сообщением, если нет, то выведите на печать "нет".
Помогите, пожалуйста, очень нужно)