Определить правильность даты, введенной с клавиатуры - Turbo Pascal

  1. Всем привет) помогите пожалуйста очень сложно для меня не умею в Паскале работать( вот пару задачек просто надо а то к сессии не допускают Пр №7 Даны два действительных положительных числа x и y. Арифметические действия над числами пронумерованы(1 - сложение, 2 - вычитание, 3 - умножение, 4 - деление) Составьте программу, которая по введенному номеру выполняет то или иное действие над числами. Пр №8 Определить правильность даты, введенной с клавиатуры (число - от 1 до 32, месяц от 1 до 12).Если введены некорректные данные, то сообщить об этом. Пр №9 Составьте программу выводящую на экран все чётные числа из интервала [A...B]. Пр №10 Вводится последовательность из N целых чисел.Найти сумму положительных n количество отрицательных чисел. Пр №11 Пусть дано в вещественных чисел, которые вводятся последовательно по одному. Вычислить среднее арифметическое двухзначных чисел. Результат вывести на экран.


textual

Код к задаче: «Определить правильность даты, введенной с клавиатуры - Turbo Pascal»

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.

СДЕЛАЙТЕ РЕПОСТ

8   голосов, оценка 3.750 из 5



Похожие ответы
  1. Дана матрица 7x7. Определить суммы всех элементов матрицы, лежащих на диагоналях. Помогите сделать, пожалуйста! Заранее спасибо ОГРОМНОЕ!

  1. Подскажите, наведите на путь, я реально не могу сообразить как она должна работать!! Танк в компьютерной игре может двигаться в одном из четырех направлений, обозначим их числами: 1 — север, 2 — восток, 3 — юг, 4 — запад. Направление движения изменяется тремя командами: 1 — поворот направо, 2 — поворот налево, 3 — поворот кругом. Пользователь вводит начальное направление движения, а затем ряд команд. Программа должна определять и печатать всякий раз новое направление. Выход из цикла — команда 0.

  1. Каждая из трех доярок надоила за год (365 дней) R1, R2,R3 литров молока. Определить, у какой доярки наибольший среднесуточный надой молока и вывести на экран ее номер.

  1. Круг вписан в квадрат со стороной А. Определить, превышает ли площадь круга заданную величину Х и вывести сообщение на экран.

  1. Как мы знаем, Владимир периодически посещает плавательный бассейн. При взгляде сверху бассейн представляет собой прямоугольник размера W × H; его юго-западный угол имеет координаты (0; 0), северо-восточный — (W; H). Владимир находился в точке с координатами (X; Y), когда прозвенел звонок, оповещающий об окончании сеанса. Теперь Владимиру нужно плыть к ближайшему бортику, чтобы выйти из бассейна. Помогите ему определить, в какую сторону следует плыть. Входные данные Первая строка содержит целые числа W и H (1 ≤ W, H ≤ 100) — соответственно длину и ширину бассейна. Первая строка содержит целые числа X и Y (0 ≤ X ≤ W, 0 ≤ Y ≤ H) — координаты точки, в которой находится Владимир. Выходные данные Выведите один из символов 'N' (север), 'E' (восток), 'S' (юг), 'W' (запад), соответствующий направлению до ближайшего бортика. Если подходящих ответов несколько, выведите любой из них.

  1. Вот предложение: "Дана строка. Группы символов, разделенные пробелами и не содержащие пробелы внутри себя, будем называть словами." Написать программу, удаляющую в каждом слове повторяющиеся символы.

  1. Написать программу на зыке Pascal для обработки матриц. Размерности матрицы и ее элементы должны вводиться с клавиатуры. Полученная матрица и другие элементы должны выводиться на экран. Определить произведение элементов в тех столбцах, которые не содержат элементов кратных 5.

  1. Программа, не могу понять как сделать Определить количество элементов равных нулю в заданной матрице А размерностью n*n.

  1. Даны │y│≤ 1; ε. Определить f(y) с точностью ε

  1. Дан двумерный массив размером МxN заполненный случайным образом. Определите, есть ли в данном массиве столбец, в котором все элементы четны и положительны