Ответы на вопрос:
Ластик - 2, Инструменты рисования - 4, инструменты выбора - 1, инструменты камеры - 6, инструменты преобразования - 5, инструменты окраски - 3
// pascalabc.net, версия 3.2 var p1, p2: integer; function getp(a, b: integer): integer; begin getp : = 2 * (a + b); end; begin p1 : = getp(readinteger('a1 = '), readinteger('b1 = ')); p2 : = getp(readinteger('a2 = '), readinteger('b2 = ')); if p1 > p2 then writeln('периметр первого больше'); if p1 = p2 then writeln('периметры равны') else writeln('периметр второго больше'); end.
Популярно: Информатика
-
nastusya170902.06.2023 16:42
-
Astronavtka23.06.2023 00:58
-
Aminka2627.08.2020 23:02
-
verastepanova503.12.2022 11:20
-
XxxOoo28.01.2022 05:04
-
sonyashestakova17.03.2022 17:07
-
morshchininao10.03.2021 19:02
-
9Единорожка111111126.03.2022 14:45
-
Харли50503.04.2020 19:05
-
Pomogashka200204.08.2022 13:41