1)сколько различных бусин из 10 камушков можно составить из неограниченного количества черных и белых камушков? а)10 в)100 с)200 d)1024 2)допустим,сегодня-15 декабря. какой месяц будет через 1000 месяцев? а)декабрь в)март с)май d)апрель 3)из 25 учащихся в классе 8 учатся на "4" и "5", 5- на "3" и "4", тех , (кто учится только на "5" в два раза меньше тех,кто учится только на "3" и в три раза меньше тех,кто учится только на "4".сколько людей учатся) только на "4" а)6 в)4 с). 3 d)2 4)из символов а, б и с составлен последовательность : а, б, с, ба, бб, бс . напишите 10-ый элемент последовательности.
187
216
Ответы на вопрос:
var
x1, x2, count: integer;
begin
writeln('введите последовательность целых чисел через пробел,');
writeln('последним введите число нуль: ');
read(x1);
while x1 < > 0 do
begin
read(x2);
while x1 * x2 < 0 do
begin
inc(count);
break
end;
x1 : = x2;
end;
write('последовательность меняет знак ',count, ' раз');
readln;
end.
Популярно: Информатика
-
Che1129.10.2021 00:32
-
DashkaPypsik04.02.2022 15:54
-
vztositgicgc19.03.2020 12:35
-
Ови1112.03.2020 17:59
-
пОмО0гите27.10.2021 08:35
-
saya828202.06.2023 19:44
-
анна226527.01.2023 22:14
-
knowwhatsorry10409.04.2022 05:14
-
Amexinia20.01.2020 03:42
-
anuaribragimov130.11.2020 18:58