С каждым годом компьюторы становятся все более совершенны: появляются новые виндуусы, новые программы фотошопа и защиты от вирусов, новые компьюторные супер-экраны, ксерокс, принтер, скайп и тд

0 0

4 года назад

Помогите пожалуйста! Пользователь вводит число, если это число равно 1 , то это январь, если равно 2 , то это февраль , 3 - это

Шлема максим

{ Pascal }
PROGRAM Calendar(INPUT, OUTPUT);

VAR
Num: INTEGER;

BEGIN
WRITE('Введите номер месяца: ');
READ(Num);
CASE Num OF
    1: WRITELN('Январь');
    2: WRITELN('Февраль');
    3: WRITELN('Март');
    4: WRITELN('Апрель');
    5: WRITELN('Май');
    6: WRITELN('Июнь');
    7: WRITELN('Июль');
    8: WRITELN('Август');
    9: WRITELN('Сентябрь');
    10: WRITELN('Октябрь');
    11: WRITELN('Ноябрь');
    12: WRITELN('Декабрь');
END;
END.

0 0

4 года назад

Во время каникул весёлые человечки отправились путешествовать на разных видах транспорта. Незнайка проплыл 57 км на пароходе, пр

морган 473

57+61+191=309км Незнайка
197+13=210км Поэт Цветик
129+16=145км Торопыжка
34+51=85км Доктор Медуцина

0 0

4 года назад