Ответы на вопрос:
pascal
program qq; var a,b,s,p : integer; beginwriteln('введите стороны прямоугольника'); read(a,b); s: =a*b; p: =2*(a+b); writeln('площадь прямоугольника равна ',s); writeln('периметр прямоугольника равен ',p); end.
Популярно: Информатика
-
Лизззззззаааааа17.08.2020 18:17
-
ndjfhfidi22.09.2020 19:28
-
mashacat557107.03.2020 20:29
-
ZaY40nOK07.08.2022 23:51
-
yfryjkngttyufddvn02.07.2022 13:47
-
fedor1daniil1217.08.2022 16:13
-
SosaLegor312lok06.06.2021 21:16
-
milla2515.10.2022 16:44
-
teaonline02.05.2021 11:32
-
настясердечкотв223.06.2023 23:10