Напишите для данной программы блок - схему. var s, p: real;
n,k, x : integer;
Begin
x:= 3;
s:= 0;
p:= 1;
for n:= 1 to 4 do
s:= ((x-1)/(x+1))**(2*n + 1)/(2*n +1);
for k:= 1 to 8 do
p:= (k+3)/(k+5);
writeln ('s = ', s:6:4);
writeln ('p = ', p:6:4);
end.
124
322
Ответы на вопрос:
var
a, z, x: integer;
begin
x:=0;
read(a);
while a <> 0 do
begin
if (a mod 3 = 0)
then
z := z + 1 ;
x:=x+1;
read(a);
end;
writeln(x,' ', z);
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Tina280218.04.2022 19:49
-
max69823.10.2020 10:11
-
лолkjk28.06.2023 07:46
-
Plushtrap26.03.2021 17:46
-
34516010.08.2022 13:41
-
dgony200308.01.2023 14:06
-
NastyaMeow0528.05.2021 12:45
-
ЮляКіска19.12.2020 14:06
-
nataliamakarov315.04.2021 15:13
-
annagrits6626.09.2021 11:14
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.