07.09.2022 

Складіть блок-схему фрагмента алгоритму і виконайте його (Лазарус)
а) n:=0;
for i:=1 to 4 do
n:=n+i*i*i. Треба скласти блок-схему і таблицю виконання фрагмента проєкту.
Ось такі (i) це англійські.

. 25

Пошаговый ответ

03.04.2023, проверен экспертом
Разблокировать ответ

Блок-схема:
   ++

   | i := 1|

   ++

        |

        V

   ++   ++

   |n := 0 |-->| i <= 4                 |

   ++   ++

        |               |

        V               |

   ++          |

   |n := n +|          |

   | i^3    |          |

   ++          |

        |               |

        V               |

   ++           |

   | i := i+1|<+

   ++



Таблиця виконання:

i n

1 1

2 9

3 36

4 100

Код мовою Pascal:

var

 n, i: Integer;

begin

 n := 0;

 for i := 1 to 4 do

   n := n + i*i*i;

end.

Другие вопросы по предмету

Информатика Информатика
Пошаговый ответ
P Ответ дал Студент

Костер: в древности люди разжигали костры, дым от которых был виден за сотни километров. Они служили визуальными сигналами, оповещали о чем-то, например об опасности.

Сумка с конвертами внутри: это атрибутика почтальона, разносящего письма.

Барабан: барабанная дробь, так же символ передачи информации, но уже звуковой. Это происходило в старые времена во время военных баталий, так же при военных построениях и парадах, что происходит и по сегодняшний день, барабанный дробь отбивает такт, под который маршируют солдаты.

Информатика Информатика
Пошаговый ответ
P Ответ дал Студент

Якщо загородка - прямокутник,

Умовно З - це заєць,

то схема розташування зайців така:

 

З              З

 

                З

З        З    

 

Три зайці - по кутках, два - біля стінок загородки.

Информатика Информатика
Пошаговый ответ
P Ответ дал Студент

Program n1;
Uses CRT;
Const n=20;
Var m: array[1..n] of integer;
i,a,s,b: integer;
begin
ClrScr;
Randomize;
For i:=1 to n do
begin
m[i]:=random(50);
write(m[i]:3);
end;
writeln;
writeln('Введите A и B');
readln(a,b);
For i:=a to b do
s:=s+m[i];
writeln('Сумма равна ',s);
readln
end.

Информатика Информатика
Пошаговый ответ
P Ответ дал Студент

1. Выберите Оператора

2.Введите номер телефона

3. Проверьте и подтвердите номер телефона

4.Введите в окно "сумма оплаты"

5.Внесите купюры в купюроприёмник (возможно ввод нескольких купюр

6.Нажать кнопку "Оплатить"

7.Дождитесь распечатки чека

8.Перейдите в окно "Главное"

Подробнее - на -

Информатика Информатика
Пошаговый ответ
P Ответ дал Студент

var a,b:real;

begin

write("Vvedite chisla: ");

read(a,b);

write("Bolshee chislo: ");

if a>b then write(a) else write(b);

readln

end.

Информатика Информатика
Пошаговый ответ
P Ответ дал Студент
Задача №1
Формула N=2^{i}, где N-количество цветов.
                                  i - кол-во бит на одну точку.
8=2^3
16=2^4
256=2^8

Задача №2
 265(возможно опечатка), тк нужно будет пользоваться другой формулой: I = log_{2}N
Подставив все получим:
I = log_{2}265 
i=8.0498, но тк память не может быть вещественной, то i=8 бит=1 байту
800*600=48*10^{4} - количество пикселей 
48*10^{4}*1=480 000 байт
ответ: 480000 байт или 468,75 Кбайт

Задача №3
Формула A = D*t*i, где D - частота дискретизации (Гц)
                                       t - время звучания или записи звука
                                       i - разрядность регистра (разрешение)
                                       A - размер аудиофайла
                             Если звук стерео нужно еще домножить на 2.
Подставив все в формулу получим:
A=48*1000*16*10*2
A=1536*10000 (бит)
A=1920*1000 (байт)
А= 1875 (Кбайт)
ответ: 1875 Кбайт
Информатика Информатика
Пошаговый ответ
P Ответ дал Студент

1024 Килобайт, или 1 Мегабайт. Если изображение BMP, остальные форматы вшивают в байты свои "печати"

Информатика Информатика
Пошаговый ответ
P Ответ дал Студент
1 2 3 4 5 6 7 8 int i, t1=A[0][0], t1=A[0][3]; for(i=1; i<4; i++) {     if(t1<A[i][i]) t1=A[i][i];     if(t2>A[i][n-i-1]) t2=A[i][n-i-1]; } if(t1>t2) printf("Yes\n"); else printf("No\n"); лови,зайка,это моё хобби)
Информатика Информатика
Пошаговый ответ
P Ответ дал Студент

y: =sqrt((abs(sqr(x)*x-15))/(sqr(x)+1));