Помогите по ИВТ 7 класс 3 четверть решить​

0 голосов
32 просмотров

Помогите по ИВТ 7 класс 3 четверть решить​


image

Информатика (24 баллов) | 32 просмотров
Дан 1 ответ
0 голосов

Program Perimetr;

var   P, a,b,c:integer;

Begin

 writeln('Введите длины сторон треугольника ');

 write('a='); readln(a);

 write('b='); readln(b);

 write('c='); readln(c);

 

 P:= a+b+c;

 

 writeln('Периметр треугольника = ', P);

end.

(22 баллов)