Пожалуйста помогите!Напишите программку, которая в последовательности целых чисел определяет
Пожалуйста помогите!
Напишите программу, которая в последовательности целых чисел определяет число отрицательных трехзначных чисел, кратных 3 и оканчивающихся на 6.
программка должна вывести одно число - число отрицательное трехзначных чисел кратных 6 и заканчивающихся на 3.
Признаком конца ввода чисел - ввод 0.
Пример работы программки:
Входные данные Выходные данные
-186 1
-36
36
186
0
Регина Кипариси
Сколько чисел в последовательности?
Toha Skidinov
Входные данные
Камилла Алалыкина
Входные данные -186, -36, 36, 186, 0, выходные данные только 1
2 ответа
Siketin Alesha
Var
A,k:integer;
Begin
k:=0;
Read(A);
While Alt;gt;0 do
Begin
Read(A);
if (Alt;-99)and(Agt;-1000)and(A mod 3 = 0)and(A mod 10 = -6) then
k:=k+1;
End;
WriteLn(k);
End.
A,k:integer;
Begin
k:=0;
Read(A);
While Alt;gt;0 do
Begin
Read(A);
if (Alt;-99)and(Agt;-1000)and(A mod 3 = 0)and(A mod 10 = -6) then
k:=k+1;
End;
WriteLn(k);
End.
Полина Строна
На что можно поменять repead...until ?
Леонид Жнивин
Цикл repeat можно поменять на while
Павел Аль-Габбан
Спасибо
Шепилло
Иван
Переработать программку ?
Семик
Var a, k:integer;Begink:=0;while k<>0 doRead(a);if (A>99)and(A<1000)and(A mod 3 = 0)and((A mod 10 = 6)or(A mod 10 = -6)) then k:=k+1; a = 0;Writeln(k);End.
Артём Баразновский
Где-то ошибка
Мишаня Ахронов
Обновите страничку
Таисия Маханева
Поправил программку.
Илья Лапыко
Спасибо!
Ирина Лучовкина
include lt;iostreamgt;
include lt;cmathgt;
using namespace std;
int main()
int a, c = 0;
for(cingt;gt;a; a!=0;
c+=(alt;0 amp;amp; !абс(a/1000) amp;amp; abs(a/100) amp;amp; !абс(a%3) amp;amp; абс(a%10)==6),
cin gt;gt; a);
cout lt;lt; c lt;lt; endl;
include lt;cmathgt;
using namespace std;
int main()
int a, c = 0;
for(cingt;gt;a; a!=0;
c+=(alt;0 amp;amp; !абс(a/1000) amp;amp; abs(a/100) amp;amp; !абс(a%3) amp;amp; абс(a%10)==6),
cin gt;gt; a);
cout lt;lt; c lt;lt; endl;
Альбина
Ого, это очень сложно, но если этот ответ правильный, то ты гений.
Денис Мозганов
нетрудно и ничуть не отличается от ответа выше)
Arsenij Kuljushkin
Я новичок в этом
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов