Помогите составить программу для Паскаля на сравнение двух чисел
5-9 класс
|
Program hren;
uses crt;
var x,y:integer;
BEGIN
writeln('enter your numbers');
readln(x,y);
if x>y then
begin
writeln('the first number is greater');
end else
begin
writeln('the second number is greater');
end;
END.
var x, y: integer;
begin
readln(x, y);
if (x = y) then writeln('x = y');
if (x < y) then writeln('x < y');
if (x > y) then writeln('x > y');
end.
Другие вопросы из категории
1. Дана длина ребра куба а. Найти объем куба V = a3 ( третья степень ) и площадь его поверхности S = 6 *a2. а = 2.00 V = 8.000 S = 24.000
2. Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = а*b*c
и площадь поверхности S = 2*( а*b + b*c + a*c ) a = 8.40 b = 3.80 c = 9.40 V = 300.048
S = 293.200
3. Найти длину окружности L и площадь круга S заданного радиуса R : L = 2*П (пи)*R, S = П (пи)*R2 (в квадрате) П = 3.14 R = 1.50 L = 9.420 S = 7.065
P.S *- умножение
Читайте также
1. Составьте программу для определения большего из двух чисел х или у
2. Составьте программу для нахождения площади прямоугольника по заданным сторонам а и б
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.
Клоун
предложил каждому из публики задумать число. Потом он сказал: «Прибавьте к
задуманному числу 5. Теперь из результата вычтите 2. А теперь к результату
прибавьте 7». Потом клоун спросил у желающих, какое число у каждого из них
получилось. Услышав ответ, он немедленно объявлял каждому, какое число тот
задумывал. Составьте программу, которая повторяла бы фокус клоуна.