marinka02jkjk
07.09.2020 09:58

1.напиши программу, которая выводит на экран (в одну строку через пробел) элементы арифметической прогрессии с a1=0,d=7,an=98.
2.с клавиатуры вводится целое положительное (может быть равно 0) число с, не превышающее 30 000. напиши программу, которая считает и выводит на экран количество нечётных цифр числа с.

pascal

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
kirillanisimovp08nm9
10.10.2020 21:41

===== PascalABC.NET =====

begin

 // 1

 Range(0, 98, 7).Println;

 // 2

 var n := ReadInteger('n =');

 var k := 0;

 while n > 0 do

 begin

   if Odd(n mod 10) then

     k += 1;

   n := n div 10  

 end;

 k.Println

end.


1.напиши программу, которая выводит на экран (в одну строку через пробел) элементы арифметической пр
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота