Ответы на вопрос:
Uses crt; var a,b,c,sk,sp: real; begin clrscr; writeln('vedut a'); readln(a); writeln('vedut b'); readln(b); writeln('vedut c'); readln(c); sk: =a*a; sp: =b*c; if sk> sp then writeln('plocha kvadrata bolhe'); if sk< sp then writeln('plocha pramoygolnuka bolhe'); readln; end.
Популярно: Информатика
-
sun5421.06.2021 14:34
-
вбцуьа24.08.2020 06:29
-
crustiYurasova22.11.2021 12:58
-
Крутойбрат23.02.2022 09:55
-
Lilit6669615.02.2021 01:53
-
Никита56383118.11.2021 23:44
-
guskovzahar201122.12.2021 16:53
-
дилли126.12.2022 12:05
-
konon70717.02.2020 14:48
-
Грамбит14.06.2023 22:49