Шапка
Форма блока шапки
Именно с шапки начинается любой скрипт. Блок шапка — это некое событие (например щелчок по зелёному флагу), которое вызвано взаимодействием пользователя с программой. Они скруглены сверху и имеют выступ снизу для прикрепления других блоков. Существуют 7 блоков шапок, 6 из которых в категории события, 1 в категории управления.
Обычный блок
Форма обычного блока
Обычные блоки – это блоки команд. Они прикрепляются сверху выступом и прикрепляют снизу выступом вовнутрь, то есть остальные блоки могут быть помещены как сверху, так и снизу обычных блоков. Всего насчитывают 71 такой блок – это самая большая категория блоков.
Логический блок
Форма логического блока
Логические блоки – это условия, определяющие правильно или ложно заданное условие. Спроси своего друга «2 умножить на 2 будет 4?» и попроси его ответить только «Да» или «Нет». Твой друг станет этаким логическим блоком. Они имеют форму шестиугольника и всего насчитывается 12 таких блоков.
Репортёр
Форма блоков репортёров
Блоки репортёры дают какие-либо значения. Они могут быть как числами, так и строками. Например, спроси друга: "Сколько будет 2 + 2?". Он ответит "4". Твой друг станет этаким репортёром. Кстати, репортёрами могут быть и переменные. Форма репортёров – закруглённые прямоугольники. Всего насчитывают 30 таких блоков, не считая репортёров переменных и списков.
Обвивающий блок
Форма обвивающего блока
Обвивающие блоки – это блоки повторения или блоки условий. Их насчитывают всего 5 и их можно найти во вкладке "Управление". Имеют выступ вовнутрь сверху и простой выступ внутри и снаружи.
Закрывающий блок
Форма закрывающего блока
Закрывающие блоки заканчивают скрипт или все процессы. Имеют выступ вовнутрь сверху и не могут иметь прикреплённых блоков снизу. Всего существует 2 закрывающих блока, и оба находятся во вкладке "Контроль".
Категории блоков
Объяснение:
У меня получилось 6, но если ответ другой должен получиться, то надеюсь разберешься там с прогой и исправишь
Объяснение:
var x,y,n,b,c,q:integer;
f:array [-1..1000] of integer;
begin
for var i:=1 to 1000 do begin
if i<=15 then
f[i]:=2*i*i+4*i+3;
if (i>15) then
if (i mod 3=0) then
f[i]:= f[n-1]+i*i+3
else
F[i]:= f[i-2]+i-6;
end;
for var i:=1 to 1000 do begin
x:=f[i];
while x>0 do begin
b:=x mod 10;
x:=x div 10;
if b mod 2=0 then begin
q+=1; break;
end;
end;
if q=0 then
c+=1;
end;
writeln (F);
writeln (c);
end.
Всё просто.
Объяснение:
Правильный ответ - 1(81).