Решебник
- Урок 11. Задание 3.
- ...
- Урок 13. Задание 7.
- Урок 13. Задание 8.
- Урок 13. Задание 9.
- Урок 14. Задание 1.
- Урок 14. Задание 3.
- Урок 14. Задание 4.
- Урок 14. Задание 5.
Program plow;
const pi=3.14;
var a,b,pr,s:real;
begin
a:=10;
b:=12;
pr:=(a+b)*2;
Writeln('Периметр прямоугольника равен ',pr);
s:=a*b;
Writeln('Площадь площадь прямоугольника равна ',s);
End.
const pi=3.14;
var a,b,pr,s:real;
begin
a:=10;
b:=12;
pr:=(a+b)*2;
Writeln('Периметр прямоугольника равен ',pr);
s:=a*b;
Writeln('Площадь площадь прямоугольника равна ',s);
End.