Составьте программу для решения следующей . введите - вопрос №3390012 от кристина2161 07.01.2022 18:00

Question

Информатика: Составьте программу для решения следующей . введите с клавиатуры два числа: n и m. если оба числа больше 100, то замените каждое из них меньшим и выведите результаты на экран. если первое число положительное, а второе отрицательное, то уменьшите их в два раза и выведите результаты. иначе, найдите и выведите среднее арифметическое этих чисел.

кристина2161 · Answer

Program A1;varN,M,K:real;Beginwriteln( Введите числа N и M );readln(N,M);If N 100 and M 100 thenN:=N-1;M:=M-1;writeln(M,N);If N 0 and M 0 thenN:=N/2;M:=M/2;writeln(N,M)ElseK:=0;K:=(M+N)/2;writeln(K);End....