написать программу которая находит среднее арифметическое пяти целых нечетных чисел, вводимых с клавиатуры
5-9 класс
|
//Среда Паскаль
Uses crt;
var
a, b, c, d, e: integer;
begin
writeln ('Введите числа');
readln(a,b,c,d,e);
if (a mod 2)=0 then writeln ('Ошибка ввода') else
if (b mod 2)=0 then writeln ('Ошибка ввода') else
If (c mod 2)=0 then writeln ('Ошибка ввода ') else
If (d mod 2)=0 then writeln (' Ошибка ввода ') else
If (e mod 2)=0 then writeln (' Ошибка ввода ') else
Writeln ((a+b+c+d+e) /5);
End.
какая среда разработки паскаль?
Другие вопросы из категории
Читайте также
клавиатуры.
Язык-Паскаль.
Числа (как положительные, так и отрицательные) вводятся с клавиатуры
2)Написать программу которая бы выводила на экран произведение нечетных чисел от 10 до 20.
Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не является членом последовательности). Количество чисел не превышает 100. Введённые числа по модулю не превышают 300. Программа должна вывести среднее арифметическое чисел, кратных 9, или вывести NO, если таких чисел в последовательности нет.
ввести 3 значное число и находит сумму его цифр.
2. Написать программу, которая предлагает ввести 3 значное число и меняет порядок цифр наоборот. (123- 321)
3.Написать программу, которая предлагает ввести три числа с клавиатуры, находит их сумму, произведение и среднее арифметическое.