Ответы на вопрос:
var a, b,s, p : integer; //Инициальзация переменных
begin
writeln('Введите a и b.'); // Вывод текста
readln(a,b); // Ввод переменных а, b
s := a*b; // Считаем площадь
p := 2 * (a+b); // Считаем периметр
writeln('S=' + s); // Выводи площадь
writeln('P = ' + p); // Выводим перимитр
end.
Популярно: Информатика
-
vlad141712.08.2020 12:03
-
Litsonchik23.05.2020 13:24
-
FEDY200599999M15.03.2023 11:54
-
DDaVV03.06.2023 12:39
-
ЕvilСookie05.05.2022 14:08
-
Timewinter02.04.2022 05:06
-
Якино26.01.2023 21:01
-
Adele0420.08.2021 09:10
-
fast0l0n17.10.2020 14:52
-
р555303.12.2021 06:55