volkovaekaterina303
?>

23 ! напишите программу, которая в последовательности натуральных чисел определяет количество нечетных чисел, кратных 3. программа получает на вход натуральные числа через клавиатуру, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность количество чисел не превышает 1000. введённые числа по модулю не превышают 30 000. программа должна вывести два число: длину последовательности (завершающий 0 не учитывается) и количество нечетных чисел, кратных 3.

Информатика

Ответы

Zelinskaya-Andrei
Progran hhh54;
var i,k,x:longint;
begin
  k:=0;
  for i:=1 to 1000 do;
    begin
      read (x);
      if (x mod 2 <> 0) and (x mod 3 = 0) then k:=k+1;
      if x=0 then begin
        break
      end;
    end;
  write (i-1,' ',k);
end.
Сергеевич1726
  информатика  - это   как правило наука о   методах и процессах сбора, хранения информации. с информатики   мы хорошо владеем компьютером и другими электронными и портативными приборами. с науки информатики мы   можем работать с различными программами, например как: paint - программа по созданию рисунков, граффики и т.д., так-же имеются программы по созданию мультфиьмов, анимаций, презентаций и т.д.         в заключении хочу сказать, что без этой науки мир развивался бы дольше!
vallod
Пополнение библиотеки первейшей своей обязанностью считали птолемеи. один из царей этой династии отказался продать голодавшим афинянам пшеницу, пока те не согласились передать в александрийскую библиотеку подлинные рукописи эсхила, софокла и еврипида, с тем, чтобы с них были сняты копии. однако птолемей предпочел потерять огромную сумму - 15 талантов, - оставленную у афинян в качестве залога, чем вернуть подлинники. в афины были возвращены только копии. правда, прекрасно выполненные, но - копии.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

23 ! напишите программу, которая в последовательности натуральных чисел определяет количество нечетных чисел, кратных 3. программа получает на вход натуральные числа через клавиатуру, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность количество чисел не превышает 1000. введённые числа по модулю не превышают 30 000. программа должна вывести два число: длину последовательности (завершающий 0 не учитывается) и количество нечетных чисел, кратных 3.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

manimen345
Tatianamir765654
shangina1997507
Bologova Golovach1989
Казаков
nickcook424
dream2366
Yelena_Yuliya1847
osherbinin
ivanova229
klykovav672
cutur3414
Strelkov567
andrew409
morozov1605