1. Информатика
  2. Склавиатуры вводится n натуральных

Склавиатуры вводится n натуральных чисел, каждое не больше 1000. подсчитать количество введённых чисел, каждое из которых делится нацело на 3 и оканчивается цифрой 2. как составить такую в паскале?

moudoder moudoder    2   09.09.2019 04:50    0

Ответы
mariapodgornova mariapodgornova  07.10.2020 02:24

var n,i,k,a: integer;

begin

  readln(n);

  k:=0;

  for i:=1 to n do begin

    readln (a);

    if (a div 3 <> 0) and (a mod 10 = 2) then

      k:=k+1;

  end;

  writeln(k);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
andreyrekvinov andreyrekvinov  19.05.2021 20:37
1.Какие классификации информационных систем существуют? Несколько вариантов ответа 1)по уровню автоматизации 2)по определению 3)по области применения 4)по функциональному назначению...
Melissa607 Melissa607  19.05.2021 20:38
Створити консольну програму, яка буде записувати у файл будь яку строку з інформацією, яку введе користувач. ІВ...
artem759342 artem759342  19.05.2021 20:38
скажите хороший телефон в пределах 5000т для игр (стенд пабг морталкомбат вк и тикток)хочу 2 телефон в школу а тохороший дорогой разбить боюсь...
igor6677 igor6677  10.11.2020 22:17
102 и 103 и 101, мне нужны только ответы на задачу!)...
altynai0504 altynai0504  10.11.2020 22:18
запоминающее устройство, у которого объём памяти больше, чем у регистров, при этом взаимодействие с процессором, внутри которого находится это устройство, происходит медленнее, чем...
ketti336 ketti336  10.11.2020 22:19
Осуществите перевод количества информации на одних единиц в другие: 8 Мбит= Кбит= Кбайт=Мбайт​...
linov310 linov310  10.11.2020 22:19
Информатика, тестовые вопросы Что такое чертеж с точки зрения информационной модели? Приведите пример Что такое схема с точки зрения информационной модели? Приведите пример. Приведите...
dmitry113114 dmitry113114  07.10.2019 00:20
Составьте программу, которая запрашивает стоимость 1 кг конфет и выводит на экран стоимость 0.1, 0.2, 0.3, 1 кг конфет. результат работыпрограммы может выглядеть так: введите стоимость...
fargustyana fargustyana  07.10.2019 00:20
На заводе по производству биотоплива выращивают биомассу, ежеднев но масса биомассы увеличивается на 30 %. 1 сентября масса составляла1.5 т. выведите на экран количество биомассы...
л270103л л270103л  11.08.2019 02:20
Как решать по информатике 8 класса где есть i и формулы какието ?...

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