Написать программу на языке паскаль. найти периметр трапеции длины всех сторон которой вводятся с клавиатуры.

Question

Информатика

Харита

5 декабря, 20:00

Написать программу на языке паскаль. найти периметр трапеции длины всех сторон которой вводятся с клавиатуры.

+1

Ответы (1)

Знаете ответ на вопрос?

Меланя · Answer 1

Program_z1;

var a, b, c, d, P:integer;

begin

read (a) ;

read (b) ;

read (c) ;

read (b) ;

P:=a+b+c+d;

write (' Периметр трапеции равен ', P) ;

readln; readln;

end.