Каковы различия использования цикла с постусловием в модульной и визуальной средах?

278

492

Посмотреть ответы 1

Ответы на вопрос:

23452345torer

Информатика

4,7(12 оценок)

Var a, b, c, p,s,s1: real; begin write('введите три стороны треугольника: '); read(a, b, c); p : = (a + b + c) / 2; s : = sqrt(p * (p - a) * (p - b) * (p - c)); write('введите три стороны другого треугольника: '); read(a, b ,c); p : = (a + b + c) / 2; s1 : = sqrt(p * (p - a) * (p - b) * (p - c)); write('треугольники равновеликие -- ', s = s1) end.