Информатика, опубликовано 2018-08-22 20:13:39 by Гость
Написать программу которая находит среднее арифметическое пяти целых нечетных чисел, вводимых с клавиатуры
Ответ оставил Гость
//Среда Паскаль
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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на