Составте программу найдите среднее арифметическое двух целых чисел, если эти числа положительны, и суммы этих чисел-в противном случае

chernenkopolina chernenkopolina    2   07.08.2019 20:10    1

Ответы
victorianna03 victorianna03  04.10.2020 03:38
Var a,b,c: integer;
read (a,b);
if a>0 and b>0
then c:=(a+b)/2
else c:=(a+b)
write (c);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика