Предмет: Информатика,
автор: dfhgdrcjjp5m6j6
Срочно!срочнооо !!!срочно ребят
Приложения:
![](https://files.topotvet.com/i/9ba/9ba0af1d2840f96e1661a6c065dc1bed.jpg)
Ответы
Автор ответа:
0
var b,s:real;
i:integer;
begin
Writeln('Привет,я-alconafft');
writeln('ввеидте число b');
readln(b);
for i:=1 to 5 do
begin
s:=(i+(b*b))/(sqr(sin(i)));
end;
writeln(s);
end.
i:integer;
begin
Writeln('Привет,я-alconafft');
writeln('ввеидте число b');
readln(b);
for i:=1 to 5 do
begin
s:=(i+(b*b))/(sqr(sin(i)));
end;
writeln(s);
end.
Похожие вопросы
Предмет: Математика,
автор: kakaka37kql
Предмет: Математика,
автор: vetanev13
Предмет: Литература,
автор: dimasmirnov45reg
Предмет: Математика,
автор: АлешаНикитин