1. Информатика
  2. Впаскале! №1 с клавиатуры

Впаскале! №1 с клавиатуры вводятся 10 натуральных двузначных чисел. определить сколько среди них чисел, кратных 4; №2 с клавиатуры вводятся 10 натуральных двузначных чисел. определить среднее арифметическое нечетных чисел; №3 с клавиатуры вводятся 10 натуральных двузначных чисел. определить верно ли, что среди введенных чисел есть число, в котором первая цифра в два раза больше последней.

Nilufar777 Nilufar777    2   28.05.2019 17:20    2

Ответы
Krisru376 Krisru376  01.10.2020 13:41
Var  N,I,k,j,b,l:integer; Begin For I:=1 to 10 do begin Read(n); If n mod 4=0 then l:=l+1; If n mod 2<>0 then begin k:=k+n; j:=j+1; end; If ((n div 10)/(n mod 10))=2 then b:=1; End; Writeln('1-',l); writeln('2-',k/j); if b=1 then writeln('3-да') else writeln('3-нет'); End. 
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Іруна Іруна  21.08.2019 22:10
Напишите программу, которая выводит все простые числа в диапазоне от k до n ( 2 ≤ k ≤ n ≤ 100000 ). pascal...
dasharau27 dasharau27  21.08.2019 22:10
Напишите программу, которая вычисляет факториал натурального числа n ( 1 ≤ n ≤ 10000 ), сохранив все значащие цифры. факториалом называется произведение всех натуральных...
oksaniana oksaniana  21.08.2019 22:20
При выполнении фрагмента программы операторы, составляющие тело цикла, выполнятся … раз: a: =1; while a =100 do begin a: =a*2; end;...
nesuk07 nesuk07  21.08.2019 22:20
Укажите верно записанную формулу для эт: а) =2а*8; в) =b+y8/5; с) =н7+сумм(в8: с9); d) =d3: 3; е) =8в3+9....
аружан225 аружан225  21.08.2019 22:30
Составьте программу, которая определяет число разрядов заданного натурального числа n (подсказка: сколько раз должна выполняться n=n div 10, чтобы получилось n=0)...
aika194 aika194  21.08.2019 22:30
Что такое контекст? почему меню, которое появляется при щелчке правой кнопкой мыши на объекте, называют контекстным...
Ked4 Ked4  21.08.2019 22:40
Дано натуральное число n. составьте программу, которая выводит все числа от 1 по n, у которых последняя цифра кратная 3...
  21.08.2019 22:40
Дано натуральное число n. составьте программу, которая выводит все числа от 1 по n, у которых последняя цифра кратная 3...
Nadezhda6313 Nadezhda6313  21.08.2019 22:40
#3 по exel в ячейке e5 записана формула: =b3+c4. запишите, как будет выглядеть эта формула, если её скопировать в ячейку: а) e6. б) i7. в)c4. г)e9 д) k5. е) t44...
silva78 silva78  21.08.2019 22:40
Если за неделю было потрачено 8 часов на чтение, как найти среднее за неделю ?...

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