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

Question

Информатика

Павлуня

17 декабря, 20:32

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

+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.