Задать вопрос
27 сентября, 16:53

Получить 10 случайных двузначных чисел и определить: четное число или нет.

(Паскаль)

+3
Ответы (1)
  1. 27 сентября, 17:54
    0
    Program Project;

    var

    I, N: Integer;

    begin

    for I:=0 to 9 do begin

    ReadLn (N) ;

    if (N Mod 2 = 0) then

    WriteLn ('чётное')

    else

    WriteLn ('нечётное')

    end;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Получить 10 случайных двузначных чисел и определить: четное число или нет. (Паскаль) ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1. for + random a. вывести случайное количество случайных чисел b. вывести на экран 10 случайных чисел c. вывести на экран 10 случайных чисел, значение которых лежит в отрезке [0,10] d.
Ответы (1)
Ввести слово и число раз (Ввод; паскаль, 3). Вывести это слово так: паскаль паскаль паскаль паскаль паскаль паскаль
Ответы (1)
Помогите решить задачи на паскаль. 1) Дан массив случайных чисел (количество элементов вводите с клавиатуры). Найти произведение всех элементов массива. 2) Дан массив случайных чисел (количество элементов вводите с клавиатуры).
Ответы (1)
Ответьте в кумире или Паскале 1. Найти среднее арифметическое значений всех элементов массива, состоящего их случайных положительных чисел. 2. В массиве из 15-ти целых случайных чисел из диапазона [-30; 70] найти минимальный положительный элемент. 3.
Ответы (1)
1) С помощью датчика случайных чисел получить к-вещественных чисел n (0
Ответы (1)