Составить программу на паскаль авс.
вычислить значение m по формуле m=2/sin(x), где x изменяется от 1 до 100.
220
488
Ответы на вопрос:
можно как то так:
var
m: real;
x: integer;
begin
for x : = 1 to 100 do
begin
m : = 2 / sin(x);
println('x=', x, '; m=', m);
end;
end.
Популярно: Информатика
-
Богдан228166713.12.2020 17:55
-
oleg196020.01.2021 10:30
-
consenttime18.06.2020 00:55
-
chernika2522.10.2020 18:36
-
Ухв19.05.2022 05:49
-
marinka71323.01.2023 05:16
-
кузя17711.12.2020 14:20
-
aarmen28.01.2021 12:19
-
безумнаявкедах30.05.2020 15:21
-
alex1353613.08.2020 18:43