Есть ответ 👍

№12. дано натуральное число м. написать программу для вычисления суммы вида 123+127+131+ сумма не станет больше м.

127
416
Посмотреть ответы 2

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


Если начальное значение суммы не указано в условии, то присвойте сумме ноль перед операцией. s: =0; while s => m do s: =s+3; (после do лучше писать с новой строки, у меня почему-то все в одну лепит)

var S,p,a,b,c: real;  

begin

 writeln('Введите a');

 readln(a);

 writeln('Введите b');

 readln(b);

 writeln('Введите c');

 readln(c);

 p:=(a+b+c)/2;

 S:=sqrt(p*(p-a)*(p-b)*(p-c));

 writeln('Площадь равна ',S);

end.

Популярно: Информатика