Разработать блок схему алгоритма и написать программный код на языке паскаль
10-11 класс
|
const
n=10;
var
i,j,m,x:integer;
s,p:real;
begin
readln(x);
readln(m);
p:=1;
for j:=1 to m do
begin
for i:=1 to n do
s:=s+cos(x)/sin(x);
p:=p*s;
end;
writeln(p:4:2);
end.
Другие вопросы из категории
Какой информационный объем изображения 2000 на 3000 точек, содержащего 4 цвета?
из девушек танцевала не со своим отцом. Образовались следующие пары: Лена с Андреем Ивановичем, Анна с отцом Кати, Тома с отцом Анны, Федор Петрович с дочерью Валерия Сергеевича, а Валерий Сергеевич с дочерью Андрея Ивановича. Определите кто кому приходиться дочерью? Выпишите пары: отец-дочь, поставив соответствующий номер и первую букву имени девочки.
Нам дали д/з по информатике сделать какой-нибудь сложный объект.
У кого нибудь есть предложения, а то самому в голову ничего не приходит?
Читайте также
Задание 2) Разработать блок схему алгоритма? для вычисления и вывода на экран суммы 5 случайных числе в диапазоне 0..36.
Циклы с параметрами
Разработать схему алгоритма (блок схему), написать программный код на языке паскаль, используя оператор FOR.
Составить блок-схему алгоритма решения задачи и программу на языке паскаль одним способом:
Σ сверху сигмы 40,снизу сигмы x=1 (x^2+(5/(x^2+8)))
клавиатуры. На экран вывести результат вычислений в виде таблицы. 1 Блок-схема алгоритма программы, выполненная с использованием графических средств редактора WORD; 2 Текст программы; 3 Результаты выполнения (копия экрана). (3x+2)^2- sqrt3x/(3x)^2 a 5;b 7; h 0,1
Даны три целых числа.Найти кол-во положительных чисел в исходном наборе.