Напишите пожалуйста программу в Паскале:Написать программу,которая по номеру месяца выводит название следующего за ним месяца(с помощью оператора case)
10-11 класс
|
Например: если я ввожу 2 должно выйти март
program c;
var
a:byte;
begin
read(a);
if a = 1 then write('Январь') else if a=2 then write('Февраль') else if a=2 then write('Март')else if a=2
then write('Апрель')else if a=2 then write('Май')else if a=2 then write('Июнь')else
if a=2 then write('Июль')else if a=2 then write('Август')else if a=2 then write('Сентябрь')else
if a=2 then write('Октябрь')else if a=2 then write('Ноябрь')else if a=2 then write('Декабрь'); end.
Другие вопросы из категории
В классе учится 20 учеников: 8 мальчиков и 18 девочек. В какой системе счисления записаны эти сведения? Запишите количество мальчиков и девочек в десятичной системе счисления.
Если предварительно упаковать документ архиватором, передать упакованный документ, а потом распаковать на компьютере получателя, то общее время передачи (включая упаковку и распаковку) составит 15 секунд. Размер упакованного документа составляет 40% размера исходного документа.
Сколько всего времени (в секундах) ушло на упаковку и распаковку данных? Слов «секунд», «сек.», «с.» к ответу добавлять не нужно. Считать, что время передачи файла пропорционально его размеру.
Читайте также
Например: если я ввожу 2 должно выйти март
углов.
2)
Напишите пожалуйста программу (на языке BASIC) для определения подобия:
а) двух прямоугольников по двум смежным сторонам;
б) двух треугольников по трем сторонам.
напишите пожалуйста программу на паскале и блок схему!)