
Shalith
5 год назад
Пожалуйста посчитайте пожалуйста даю 99 поинтов

ОТВЕТЫ

Velko
Oct 24, 2020
Program Perimeter;
Var a,b,c,p: real;
Begin
Writeln('Введите 3 стороны через пробел: ');
Readln(a,b,c);
p:=a+b+c;
Write('периметр: ',p);
End.
Var a,b,c,p: real;
Begin
Writeln('Введите 3 стороны через пробел: ');
Readln(a,b,c);
p:=a+b+c;
Write('периметр: ',p);
End.
131
Смежные вопросы: