Впрограмме ! var k,a,x,d: integer; begin k: =0; a: =14; writeln('продолите ряд чисел 2,5,8,11,'); readln(a); if a=14 then k: =k+1 else k: =k; writeln('выберите лишнее a)дом b)иглу c)бунгало d)контора',x); readln(d); if x=d then k: =k+1 else k: =k; writeln(k); end.
131
184
Ответы на вопрос:
Var k,a: integer; x,d: char; begin k: =0; a: =14; writeln('продолжите ряд чисел 2,5,8,11,'); readln(a); if a=14 then k: =k+1 else k: =k; writeln('выберите лишнее a)дом b)иглу c)бунгало d)контора ', x); readln(d); if d='d' then k: =k+1 else k: =k; writeln(k); end.
Популярно: Математика
-
lolSashalolo10.09.2021 11:14
-
amura2022.11.2021 16:29
-
Cat123567925.12.2020 06:42
-
ExeLisor17.05.2020 00:46
-
Чебуреккшнщншшшш10.12.2022 17:57
-
Glupaya99012.07.2021 01:54
-
Pool691406.02.2022 05:51
-
Опаснаятётя0126.03.2020 18:41
-
fianketo0513.04.2022 01:34
-
bitmobru16.12.2022 03:07