Предмет: Информатика, автор: профессотория

помогите умоляю
номер 4

Приложения:

Ответы

Автор ответа: xDhelpmexD
1
Var a, b, c, p :longint; begin WriteLn('Введите первую сторону треугольника a'); readLn(a); WriteLn('Введите вторую сторону треугольника b'); readLn(b); writeLn('Введите третью сторону треугольника c'); readLn(c); p:=(a+b+c); writeLn('Периметр треугольника равен ', p); end.
Похожие вопросы
Предмет: Математика, автор: Аноним
Предмет: Математика, автор: ivanstopic06
Предмет: Алгебра, автор: ДарБожий