Определить является ли автобусный билет счастливым.

Var  x: integer; begin write ('введите трехзначное число'); read(x);       for i: =1 to 3 do begin        d: = x mod 10;         x: = x div 10;         s1: = s1+d      end;       for i: =1 to 3 do begin        d: = x mod 10;         x: = x div 10;         s2: = s2+d      end;       if s1=s2 then write('счастливый') else write('не счастливый') end. 

Код программы:

#include <iostream>

using namespace std;

int main()

{

   int a, b ,c;

   cout<<"Введите 3 целых числа"<<endl;

   cin >>a>>b>>c;

   cout<<a<<"+"<<b<<"+"<<c<<"="<<a+b+c<<endl;

   cout<<a<<"*"<<b<<"*"<<c<<"="<<a*b*c<<endl;

   cout.precision(4);

   cout<<"("<<a<<"+"<<b<<"+"<<c<<")/3"<<"="<<(a+b+c)/3.<<endl;

   return 0;

}

Шапка

Форма блока шапки

Именно с шапки начинается любой скрипт. Блок шапка — это некое событие (например щелчок по зелёному флагу), которое вызвано взаимодействием пользователя с программой. Они скруглены сверху и имеют выступ снизу для прикрепления других блоков. Существуют 7 блоков шапок, 6 из которых в категории события, 1 в категории управления.

Обычный блок

Форма обычного блока

Обычные блоки – это блоки команд. Они прикрепляются сверху выступом и прикрепляют снизу выступом вовнутрь, то есть остальные блоки могут быть помещены как сверху, так и снизу обычных блоков. Всего насчитывают 71 такой блок – это самая большая категория блоков.

Логический блок

Форма логического блока

Логические блоки – это условия, определяющие правильно или ложно заданное условие. Спроси своего друга «2 умножить на 2 будет 4?» и попроси его ответить только «Да» или «Нет». Твой друг станет этаким логическим блоком. Они имеют форму шестиугольника и всего насчитывается 12 таких блоков.

Репортёр

Форма блоков репортёров

Блоки репортёры дают какие-либо значения. Они могут быть как числами, так и строками. Например, спроси друга: "Сколько будет 2 + 2?". Он ответит "4". Твой друг станет этаким репортёром. Кстати, репортёрами могут быть и переменные. Форма репортёров – закруглённые прямоугольники. Всего насчитывают 30 таких блоков, не считая репортёров переменных и списков.

Обвивающий блок

Форма обвивающего блока

Обвивающие блоки – это блоки повторения или блоки условий. Их насчитывают всего 5 и их можно найти во вкладке "Управление". Имеют выступ вовнутрь сверху и простой выступ внутри и снаружи.

Закрывающий блок

Форма закрывающего блока

Закрывающие блоки заканчивают скрипт или все процессы. Имеют выступ вовнутрь сверху и не могут иметь прикреплённых блоков снизу. Всего существует 2 закрывающих блока, и оба находятся во вкладке "Контроль".

Категории блоков

Объяснение: