Регистрация
Balabol2010
26.08.2021 19:24
Информатика
Есть ответ 👍

6. Ниже приведена программа, записанная на пяти языках программирования.
var a, b: integer;
begin
readln (a);
readln (b);
if not ((a<=40) and (b>50))
then
writeln (СДА')
else
writeln('HET')
end.
Было проведено 9 запусков программы, при которых в качестве значений переменных
аир вводились следующие пары чисел:
(-20, -10); (69, 54); (33, -93); (48, 86); (40, 55); (10, 35); (128, 104); (35, 50); (-64, 100).
Сколько было запусков, при которых программа напечатала «ДА»?​

244
400
Посмотреть ответы 1

Ответы на вопрос:

Shtager1501
Shtager1501
4,8(51 оценок)
// pascalabc.net 3.1, сборка 1219 от 16.04.2016 var   n,k,d: integer; begin   k: =0;   repeat       write('введите натуральное число, 0- завершить: ');       read(n);       if n> 0 then begin           d: =(n mod 100) div 10;           if (d=4) or (d=6) then inc(k)           end   until n=0;   writeln('искомых чисел - ',k) end. тестовое решение: введите натуральное число, 0- завершить: 345 введите натуральное число, 0- завершить: 6285 введите натуральное число, 0- завершить: 7854 введите натуральное число, 0- завершить: 1324 введите натуральное число, 0- завершить: 653 введите натуральное число, 0- завершить: 66666 введите натуральное число, 0- завершить: 0 искомых чисел - 2

Популярно: Информатика