Помогите с задачей в pascal.введите символ с клавиатуры Найдите сумму произведение и среднее арифметическое и среднее геометрическое цифр его кода
Нет комментариев
Ответы
Гость Var
a,b,c: integer;
begin
writeln('Введите 3 числа: ');
readln(a,b,c);
writeln(a,' + ',b,' + ',c,' = ',a+b+c);
writeln(a,' * ',b,' * ',c,' = ',a*b*c);
writeln('Среднее арифметическое чисел = ',(a+b+c)/3);
end.
Нет комментариев
Похожие вопросы
Список предметов
