Блог для маленьких школьников и их родителей
ШколаЛа

1.Найти меньшее min из двух целых чисел x и y 2.Даны натуральные числа a и b. Определить тип обыкновенной…

Автор:
Предмет: Информатика
Уровень: студенческий

1.Найти меньшее min из двух целых чисел x и y

2.Даны натуральные числа a и b. Определить тип обыкновенной дроби a/b (правильная или неправильная), ответ записать в переменную d.

3.Дано целое число х. Если оно двузначное, то в переменную s записать слово “YES”, иначе – слово “NO”.

Замечание: в программах обязательно должны быть блок ввода и блок вывода.

Ответов к вопросу: 1
  • dragon6747
    25.07.2024 | 18:37

    1)
    var x, y, min : integer;

    BEGIN
    read(x, y);
    if x < y then min := x
    else min := y;

    write(min);
    END.
    2) (im)proper fraction — (не)правильная дробь
    var a, b : integer;
    d : string;

    BEGIN
    read(a, b);
    if a >= b then d := ‘improper fraction’
    else d := ‘proper fraction’;

    write(d);
    END.
    3)
    var x : integer;
    s : string;

    BEGIN
    read(x);
    if (x >= 10) and (x < 100) then s := ‘YES’
    else s := ‘NO’;

    write(s);
    END.

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.