Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 979 ответов!

Ввести название месяца и вывести на экран время года Pascal

5-9 класс

Alin1111 13 февр. 2017 г., 8:16:51 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
05077449354lera
13 февр. 2017 г., 9:51:15 (7 лет назад)


var n:integer;
begin
cls;
writeln ('Введите номер месяца');
readln (n);
if (n=1) or (n=2) or (n=12) then
writeln ('Зима')
else
if (n=3) or (n=4) or (n=5) then
writeln ('Весна')
else
if (n=6) or (n=7) or (n=8) then
writeln ('Лето')
else
writeln ('Осень');
end.

Ответить

Другие вопросы из категории

1. Вычислите, сколько килобайтов содержится в 4096 битах.

2. Вычислить, сколько байтов содержится в одном мегабайте.
3. Вычислите сколько килобайтов содержится в 30720 битах.
4. Одна тетрадь содержит 262144 символов, сколько это в мегабайтах?
5. Можно ли поместить файл размером 0,35 гигабайт на носитель, на котором свободно 365000 килобайт.
ПОМОГИТЕ ПОЖАЛУЙСТА! :(

кодироаание слова вашу мать

Читайте также

Задание1. Значение переменной Х ввести с клавиатуры. Переменной У присвоить значение 5. Вывести на экран информацию «знач.Х»+5=

«итог. сумма».

Задание 2.

Переменной Х присвоить значение 7. Переменной Р присвоить значение, равное квадрату Х. Вывести значения переменных Х и Р (через запятую). Значение Х увеличить на Х. Переменной Р присвоить значение, равное корню квадратному из Х. Вывести значения переменных Х и Р (через запятую).

DIKTANT 2

Задание 1.

Значение переменной Х присвоить в программе. При неотрицательном значении Х переменной У присвоить значение, равное корню квадратному из Х. В противном случае, переменной У присвоить значение, равное квадрату Х. Вывести на экран значение Х и значение У.

Задание 2.

Двум произвольным переменным присвоить произвольным образом соответственно 2 числа. Двум другим переменным присвоить значения, равные тангенсам двух предыдущих переменных. Вывести на экран значения всех переменных, а так же сумму значений двух последних переменных. помогите сделать пож

Дан массив из N элементов(12 элементов), заданный случайным образом от -10 до 10. Вывести на экран этот массив. С клавиатуры вводятся два числа меньше N.

Вывести на экран часть массива входящих в диапазон, двух введенных чисел. Эти два числа будут индексами к тем числам, которые надо вывести.

Вводятся 4 числа. Вывести на экран максимальное

Вводятся три числа. Вывести на экран число с минимальной суммой цифр.

Помогите пожалуйста в Паскале

2. Определить, делится ли введенное число "а" на 3. Если делится то вывести на экран "Число делится на 3".Тип переменной определить самостоятельно. При

составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0.

3. Дана программа на языке Паскаль.
var a,n,s: integer;
begin
s:=0;
n:=0;
repeat;
write('Введите число ');
readln(a);
s:=s+a;
n:=n+1;
until s>100;
writeln('Количество введенных чисел = ' ,n);
end.
Переписать программу используя цикл While.

4. Вывести на экран массив целых чисел, Состоящий из 15 элементов, значение которого из которых сгенерировано случайным образом из диапазона [20,60].

выведите на экран числа от 100 до 200

вывести на экран квадраты и кубы в диапазоне от -10 до +10
используя repeat



Вы находитесь на странице вопроса "Ввести название месяца и вывести на экран время года Pascal", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.