Дана программа: Program zl;
var s.t: integer;
begin
readln(s);
readln(t);
if (s<10) or (t>10)
I
then writeln('ДА)
else writeln('HET')
end.
Было проведено 9 запусков этой программы, при которых в качестве
значений переменных ѕи t вводились следующие пары чисел:
(1, 2); (11, 2); (1, 12); (11, 12); (-11, -12);
(-11, 12); (-12, 11): (10, 10); (10,5)
Сколько было запусков, при которых программа напечатала «ДА»?
ответ:
240
467
Ответы на вопрос:
Uses crt; var a,b,c,min: real; beginwrite('результат первого спортсмена = '); readln (a); write('результат второго спортсмена = '); readln (b); write('результат третьего спортсмена = '); readln (c); if (a< =b) and (a< =c) then min: =a; if (b< =a) and (b< =c) then min: =b; if (c< =a) and (c< =b) then min: =c; write ('победил спортсмен с результатом',min,' секунд'); end.
Популярно: Информатика
-
bisenkoda22.10.2020 04:37
-
hermoguchiy15.01.2022 03:11
-
vanek5817.03.2020 10:35
-
lizakirianova0321.05.2022 15:49
-
searchsignal03.03.2021 12:27
-
Филин462562210.05.2020 18:51
-
Асем121128.02.2023 01:28
-
ymiyax05.07.2021 19:34
-
miloft27.05.2021 09:57
-
pointbreakk902.05.2022 16:02