Надо правильное решение 70 паскаль а в с номер 1. даны три числа.если произведение первых двух чисел делится на третье число, то получить среднее арифметическое данных чисел, в противном случае вывести произведение трёх данных чисел. номер 2. даны два числа. если числа не равны, то каждое из чисел увеличить в 2 раза, в противном случае оставить числа без изменения

Швабу Швабу    3   30.09.2019 21:30    0

Ответы
Schoolboy0770 Schoolboy0770  09.10.2020 06:21

#1

var res:real; a:integer; b:integer; c:integer;

begin

   readln(a);

   readln(b);

   readln(c);

   if (a*b) mod c = 0 then

       begin

           res:=(a+b+c)/3;

           writeln(res);

       end

   else

       begin

           res:=a*b*c;

           writeln(res);

       end;

       

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика