Помогите написать программу в Turbo Pascal и составить блок-схему

Макsim · 27.11.2012, 20:39

Составить алгоритм в виде блок схемы и программу на языке Pascal:C клавиатуры вводиться номер месяца,нужно проверить является ли этот месяц зимним.

Vladimir_S · 27.11.2012, 20:55

Да, Вы правы - с подобной ерундой справится даже блин. Раз уж Вы к нему обратились, ждём.

Макsim · 27.11.2012, 20:59

я уже незнаю куда еще обратиться,я уже мучаюсь с этими задачами!!голова уже болит!!))))

Gruvi · 27.11.2012, 21:18

вот тебе кусок программы

Цитата:

case MONTH of
1, 2, 12 : writeln (‘Зима‘);
3, 4, 5 : writeln (‘Весна‘);
6, 7, 8 : writeln (‘Лето‘);
9, 10, 11 : writeln (‘Осень‘);
end;

Макsim · 27.11.2012, 21:21

мгм..спасибо

Gruvi · 27.11.2012, 21:23

Вот программа тебе:

Цитата:

Program Number1;
Var
MONTH, b, c : integer;
Begin
writeln(‘Введите цифру ‘);
readln(MONTH);
case MONTH of
1, 2, 12 : writeln (‘Зима‘);
3, 4, 5 : writeln (‘Весна‘);
6, 7, 8 : writeln (‘Лето‘);
9, 10, 11 : writeln (‘Осень‘);
end;
else writeln (‘Это число не является месяцем, календарь майя закончился‘);
end;
readln;
End.

Макsim · 27.11.2012, 21:38

дан одномерный массив из 18 целых чисел(положительных и отрицательных).Найти среднее арифметическое положительных чисел.Вывести на печать полученную величину и сам массив в 3 столбика!!!

Макsim · 27.11.2012, 21:40

спасибо!!!!

Макsim · 27.11.2012, 21:44

дан одномерный массив из 22 целых чисел(положительных,отрицательных и нулевых).Найти количество нулей,с порядковыми номерами,кратным четырем.Вывести полученную величину в массив в 2 столбика

Макsim · 27.11.2012, 21:44

решите.....пожалуйста!!

27.11.2012, 20:39	#1 (permalink)
Макsim Новичок Регистрация: 27.11.2012 Сообщений: 7 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Помогите написать программу в Turbo Pascal и составить блок-схему Составить алгоритм в виде блок схемы и программу на языке Pascal:C клавиатуры вводиться номер месяца,нужно проверить является ли этот месяц зимним.

27.11.2012, 20:39
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Решение проблемы может скрываться в одной из этих тем Помогите составить блок-схему и программу Составить блок-схему алгоритма. Написать листинг

27.11.2012, 20:55	#2 (permalink)
Vladimir_S Специалист Регистрация: 27.08.2008 Адрес: Санкт-Петербург Сообщений: 27,807 Сказал(а) спасибо: 340 Поблагодарили 583 раз(а) в 208 сообщениях Репутация: 113184	Да, Вы правы - с подобной ерундой справится даже блин. Раз уж Вы к нему обратились, ждём.

27.11.2012, 20:59	#3 (permalink)
Макsim Новичок Регистрация: 27.11.2012 Сообщений: 7 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	я уже незнаю куда еще обратиться,я уже мучаюсь с этими задачами!!голова уже болит!!))))

27.11.2012, 21:21	#5 (permalink)
Макsim Новичок Регистрация: 27.11.2012 Сообщений: 7 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	мгм..спасибо

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

27.11.2012, 21:38	#7 (permalink)
Макsim Новичок Регистрация: 27.11.2012 Сообщений: 7 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	дан одномерный массив из 18 целых чисел(положительных и отрицательных).Найти среднее арифметическое положительных чисел.Вывести на печать полученную величину и сам массив в 3 столбика!!!

27.11.2012, 21:40	#8 (permalink)
Макsim Новичок Регистрация: 27.11.2012 Сообщений: 7 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	спасибо!!!!

27.11.2012, 21:44	#9 (permalink)
Макsim Новичок Регистрация: 27.11.2012 Сообщений: 7 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	дан одномерный массив из 22 целых чисел(положительных,отрицательных и нулевых).Найти количество нулей,с порядковыми номерами,кратным четырем.Вывести полученную величину в массив в 2 столбика

27.11.2012, 21:44	#10 (permalink)
Макsim Новичок Регистрация: 27.11.2012 Сообщений: 7 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	решите.....пожалуйста!!