Ниже приведена программа, записанная на трёх языках
программирования.
Алгоритмический язык
Бейсик
Паскаль
алг
DIM st AS INTEGER
var st: integer;
нач
INPUTS
Begin
цел s, t
INPUT
readln(s);
ВВОД Ѕ
IF s>10 OR >10 THEN
readln(t);
Ввод t
PRINT "ДА"
if (s>10) or (>10)
then writeln('ДА')
если s>10 или >10
ELSE
PRINT 'HET'
else writeln('HET')
то вывод “ДА”
ENDIF
End.
Иначе вывод “НЕТ”
все
КОН
Было проведено 9 запусков программы, при которых в качестве
значений переменных ѕИt вводились следующие пары чисел:
(1, 2); (11, 2); (1, 12); (11, 12); (-11, -12); (-11, 12); (-12, 11); (10, 10); (10,
5).
Сколько было запусков, при которых программа напечатала «ДА»?
ответ:​