ЧернаяРадуга
26.04.2022 14:20

Составить программу в pascalabc с применением цикла 50 ​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
дарья1640
28.05.2020 18:24

program abc;

var n,x: integer;

s: real;

begin

s:=0;

x:=1;

readln(n);

while x<=n do

begin

s:=S+(exp(2*ln(sin(x)))+cos(sqrt(x)));

x:=x+1;

end;

writeln(s);

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота