1. Информатика
  2. Написать программу, которая

Написать программу, которая обеспечивает ввод последовательности чисел. количество чисел в последовательности неизвестно. программа должна находить количество чисел, которое кратно 3 и заканчивается на 6.

ооа10 ооа10    2   25.08.2019 12:20    0

Ответы
kirill23710 kirill23710  05.10.2020 18:45
Program n1;
var a,k: integer;
begin
readln(a);
k:=0;
while a<>0 do
begin
if (a mod 3=0) and (a mod 10=6) then
k:=k+1;
readln(a);
end;
write(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
karikovt karikovt  08.10.2019 20:10
Вscratch 2 делали приложение бабочка с фоном и спраидом, напишите код для спрайда...
anna47983 anna47983  08.10.2019 20:10
Составить блок схему и написать программу в турбо паскале. .человеку нужно съездить из лондона в эдинбург. расстояние между этими составляет 390 миль. можно ехать...
Надежда1класс Надежда1класс  08.10.2019 20:10
Даны три нечётных числа 3,7,1 . результатом является среднее арифметическое данных чисел . определите тип входных и выходных данных . переменные; значения; тип данных;...
Лютаяяяя Лютаяяяя  08.10.2019 20:10
При включении ноутбука сразу появляется нижнее подчеркивание в левом верхнем углу экрана. на сколько я знаю это случается когда пк не понимает от куда ему читать...
KoreanSun1109 KoreanSun1109  27.08.2019 00:10
Дана матрица размерами 4 на 4. заполните ее следующим образом: если сумма индексов четная – в ячейке должно содержаться произведение индексов, если сумма индексов...
Alina29521 Alina29521  27.08.2019 00:10
Впроцессе преобразования растрового графического файла количество цветов уменьшилось с 1024 до 32. во сколько раз уменьшился информационный объём файла ?...
tatiana260378 tatiana260378  27.08.2019 00:10
Кто шарит? хелп ми, у меня ноутбук asus x550c, надо драйвера, чтоб wifi был, дайте ссылок, вообще не шарю, винду переустановил не думал, что интернет слетит((...
Lexakek111 Lexakek111  27.08.2019 00:10
Вы находитесь в лесу обнаружили на своем теле клеща определите порядок ваших действий по снижению опасности заражения клещевым энцефалитом...
hellppp1 hellppp1  27.08.2019 00:10
Для подключения к интернету компьютерного класса целесообразно использовать ?...
Kiska89 Kiska89  13.08.2019 15:10
Просмотрев исходный код html-страницы, вася увидел такую строку: кит-не капля в море знаний! (^_^) сколько слов этой строки будут выделены полужирным шрифтом?...

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