Регистрация
mrsmauriziodimauro
19.11.2022 19:03
Информатика
Есть ответ 👍

Определить среднее арифметическое двух чисел, если a положительное, в противном случае найти частное этих чисел

147
452
Посмотреть ответы 2

Ответы на вопрос:

enotnana
enotnana
4,6(18 оценок)

var a,b,c:integer;

begin

 Writeln('Введите два числа: ');

 Read(a,b);

 if a>0 then

   Writeln('Среднее арифметическое: ', (a+b)/2)

 else Writeln('Частность: ', a/b);

end.

malinkarinka599
malinkarinka599
4,4(85 оценок)

чо делать надо

Популярно: Информатика