Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

решите пж срочнооооо

10-11 класс

Ppnkjn 28 июля 2014 г., 1:02:27 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Tanyakov3
28 июля 2014 г., 3:30:46 (9 лет назад)

var n,s,i,x: integer;
begin
  write('n='); readln(n);
  for i := 1 to n do begin
    readln(x);
    if x mod 3 = 0 then s := s + 1;
  end;
  writeln('кратных 3: ', s);
end.

Ответить

Другие вопросы из категории

Дан файл f, содержащий сведения о кубиках: размер каждого кубика (длина ребра в см), его цвет (красный, зеленый, желтый, синий) и материал (деревянный,

металлический, картонный). Найдите: количество кубиков каждого из перечисленных цветов и их суммарный объём;

Доска для игры «Бим-бом» - поле размером 8´4

клеточки. Какое минимальное количество бит потребуется для кодирования
координат одного поля такой доски?

c полным решением,пожалуйста

Читайте также

Люди,прошу вас, помогите пожалуйста, я уже долго сижу над этой задачей,не могу решить,пожалуйста помогите! =(((

найти номер третьего положительного элемента в потоке из 10 чисел или сообщить,что трех положительных элементов нет. (Решать без массива)

Решите пожалуйста!

Это информатика, 10 класс
Вопросы на фотографии
Номера 5 и 6 не надо решать

Cоставить программу автоматического переноса слов. Исходная информация вводится с клавиатуры. (В Бейсике) Решившему скину 100 рублей на телефон , оче

нь очень надо! Я не поняла суть задания.. переноса , скорее всего, в другую строку.. Как понимаете , решите , пожааалуйста !!!!! :)))))))))

Две девочки и два мальчика из 2 Б. класса соревновались в умении решать задачи . Всего ребята решили 11 задач , причем все - разное количество . Кто решил

больше задач: мальчики или девочки ,если один мальчик решил больше всех ,а другой меньше всех ?



Вы находитесь на странице вопроса "решите пж срочнооооо", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.