Ответы на вопрос:
объяснение:
209 143 32 208 187 209 142 208 177 208 187 209 142 32 208 184 208 189 209 132 208 190 209 128 208 188 208 176 209 130 208 184 208 186 209 131
//pascalabc.net 3.2 сборка 1318 var s,a: string; i: integer; c: char; begin s: ='01234567'; for i: =1 to 3 do begin c: =s[length(s) div 2]; writeln('число больше ',c,'? '); readln(a); if a='да' then delete(s,1,length(s) div 2) else delete(s,length(s) div 2+1,length(s) div 2); end; writeln(s); end. пример работы программы: число больше 3? да число больше 5? нет число больше 4? нет 4
Популярно: Информатика
-
жания11226.02.2020 19:55
-
Artem0317q29.01.2021 01:31
-
kseni2311200119.09.2022 23:06
-
kvpopochku04.10.2022 22:45
-
tayanika22.08.2021 00:00
-
Kirill1500316.06.2020 22:09
-
fgrtyrrrrty19.02.2021 06:34
-
Jfjdhdhhdjdxjxh111117.02.2020 08:21
-
Polino4444444ka11.03.2022 08:13
-
Катя1847123.08.2021 21:35