Решить по информатике за 6класс: катя, соня. галя и тамара родились 2марта,17мая,2июля и 20марта. соня и галя родились в одном месяце, а дни рождения гали и кати обозначаются одинаковыми числами. назовите дату рождения каждой девочки. заранее !
206
347
Ответы на вопрос:
Var a, b, c, d, i, n, p: integer; x, y: real; begin writeln(' 1, введите n ='); read(n); for i : = 1 to n do if i mod 2 = 0 then x : = x + 1 / (2 * i + 1) else x : = x - 1 / (2 * i + 1); writeln('sum = ', x); writeln(' 2, введите a, b, c, d ='); read(a, b, c, d); for i : = a to b do if i mod c = d then writeln(i); writeln(' 3, введите n и n чисел ='); read(n); a : = 0; b : = 0; c : = 0; for i : = 1 to n do begin read(p); if p = 0 then a : = a + 1 else if p < 0 then b : = b + 1 else if p > 0 then c : = c + 1; end; writeln(a, ' ', b, ' ', c); writeln(' 5, введите x, p ,y ='); read(x, p, y); n : = 0; repeat x : = round(x * (100 + p)) / 100; n : = n + 1; until x > = y; writeln(n, ' лет'); writeln(' 6, введите a, b ='); read(a, b); repeat if (a mod 2 = 0) and (a div 2 > = b) then begin writeln(a, ' : 2 = ', a div 2); a : = a div 2 end else begin writeln(a, ' - 1 = ', a - 1); a : = a - 1; end; until a < = b; end.
Популярно: Информатика
-
yulyasmernyagi30.06.2023 21:49
-
kdjdjd1Dndnd30.05.2020 10:58
-
vabimGogolev21.03.2023 07:45
-
TigrNavigator32224.01.2020 06:40
-
fcpolva01.02.2021 19:41
-
ed3112103.08.2020 18:09
-
плщорршелит07.05.2021 14:28
-
500о18.03.2021 13:39
-
Амон1111130.01.2020 08:01
-
Lenokin8819.08.2022 15:05