Регистрация
mrartemartem1
17.07.2022 19:10
Информатика
Есть ответ 👍

с заданием, программы такой у меня нет

199
222
Посмотреть ответы 1

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

shintasovazeba
shintasovazeba
4,4(78 оценок)
Program a1; var n,m,k: real; begin writeln('введите числа n и m'); readln(n,m); if n> 100 and m> 100 then n: =n-1; m: =m-1; writeln(m,n); if n> 0 and m< 0 then n: =n/2; m: =m/2; writeln(n,m) else k: =0; k: =(m+n)/2; writeln(k); end.

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