Определить правильность даты, введенной с клавиатуры - Turbo Pascal
Формулировка задачи:
Всем привет) помогите пожалуйста очень сложно для меня не умею в Паскале работать(
вот пару задачек просто надо а то к сессии не допускают
Пр №7
Даны два действительных положительных числа x и y. Арифметические действия
над числами пронумерованы(1 - сложение, 2 - вычитание, 3 - умножение, 4 - деление)
Составьте программу, которая по введенному номеру выполняет то или иное действие
над числами.
Пр №8
Определить правильность даты, введенной с клавиатуры
(число - от 1 до 32, месяц от 1 до 12).Если введены некорректные данные, то сообщить об этом.
Пр №9
Составьте программу выводящую на экран все чётные числа из интервала [A...B].
Пр №10
Вводится последовательность из N целых чисел.Найти сумму положительных
n количество отрицательных чисел.
Пр №11
Пусть дано в вещественных чисел, которые вводятся последовательно по одному.
Вычислить среднее арифметическое двухзначных чисел. Результат вывести на экран.
Решение задачи: «Определить правильность даты, введенной с клавиатуры»
textual
Листинг программы
program n7; var x,y,z:real; c:integer; begin writeln('введите x и y через пробел');readln(x,y); writeln('Выберите действие: 1-сложение, 2-вычитание, 3-умножение, 4-деление');readln(c); case c of 1:writeln(x+y); 2:writeln(x-y); 3:writeln(x*y); 4:writeln(x/y); else writeln('Такого действия не существует'); end; end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д