Программирование на паскале?

Maksimdidenko2 4 окт. 2020 г., 17:29:15

Uses crt ;

var s : real ; n, i, k : integer ;

Begin clrscr ; Write('n = ') ; readln(n) ; s : = 0 ; k : = 0 ; for i : = 1 to n do if i mod 2 = 0 then begin s : = s + i ; k : = k + 1 ; end ; s : = s / k ; writeln('srednee = ', s) ; writeln ;

End.

Сидоров 3 окт. 2020 г., 05:43:18 | 5 - 9 классы

Найдите среднее арифметическое 5 любых чисел?

Найдите среднее арифметическое 5 любых чисел.

В паскале с оператором цикла for.

Арьнюшка 19 апр. 2020 г., 15:23:39 | 5 - 9 классы

Язык программирования PascalСреди всех трёхназчных чисел посчитать количество кратных 5?

Язык программирования Pascal

Среди всех трёхназчных чисел посчитать количество кратных 5.

Найти их среднее арифметическое.

Yalkunissabayev 18 окт. 2020 г., 02:19:03 | 5 - 9 классы

Паскаль?

Паскаль.

Найти среднее арифметическое чётных цифр числа.

Через repeat и until.

Astapenko1997 26 окт. 2020 г., 12:07:49 | 5 - 9 классы

Вычислите среднее арифметическое наибольшего и наименьшего из n чисел?

Вычислите среднее арифметическое наибольшего и наименьшего из n чисел.

Язык программирования Паскаль.

1234567890328 5 апр. 2020 г., 09:18:53 | 10 - 11 классы

Напишите программу, которая находит минимальное и максимальное среди чётных положительных чисел, записанных в файле, и выводит результат в другой файл?

Напишите программу, которая находит минимальное и максимальное среди чётных положительных чисел, записанных в файле, и выводит результат в другой файл.

Учтите, что таких чисел может вообще не быть.

(Язык программирования Паскаль).

Азаличка26 21 янв. 2020 г., 18:48:49 | 5 - 9 классы

Составьте программу в паскале , пожалуйста?

Составьте программу в паскале , пожалуйста.

Turbo Pascal(циклы паскаль оператор FOR) 1)подсчитать произведение первых семнадцати целых положительных чисел.

Никитакиоссе2 10 нояб. 2020 г., 21:02:09 | 10 - 11 классы

Вычислить сумму первых N чисел натурального ряда?

Вычислить сумму первых N чисел натурального ряда.

С использованием операторов цикла For - To (или For - Downto), While - Do и Repeat - Until.

Паскаль.

Nurtjt99 9 дек. 2020 г., 14:45:10 | 5 - 9 классы

1. Найти среднее арифметическое и среднее геометрическое двух чисел?

1. Найти среднее арифметическое и среднее геометрическое двух чисел.

Написать программу (Паскаль).

Romchik13 3 сент. 2020 г., 17:31:37 | 10 - 11 классы

Дан одномерный массив вещественных чисел найти средняя арифметическая положительных элементов?

Дан одномерный массив вещественных чисел найти средняя арифметическая положительных элементов.

Veravolf 21 дек. 2020 г., 23:22:17 | 5 - 9 классы

Составьте программу вычисления суммы натуральных чисел от 20 до 99 с использованием оператора for?

Составьте программу вычисления суммы натуральных чисел от 20 до 99 с использованием оператора for.