Как вычислить площадь и периметр квадрата в паскале.

Question

Информатика

Софроний

25 декабря, 15:52

Как вычислить площадь и периметр квадрата в паскале.

+3

Ответы (1)

Знаете ответ?

Володюка · Answer 1

Program p1;

var a: real;

S: real;

P: real;

begin

writeln ('Введите сторону квадрата A: ') ;

readln (a) ;

S : = a * a;

P : = a * 4;

writeln ('Площадь равна ', S) ;

writeln ('Периметр равен ', P) ;

end.