Последовательность из 10 чисел. определить сколько чисел заканчивается 0
229
280
Ответы на вопрос:
var a: array [1..10] of integer;
n,i: integer;
begin
{vvod massiva skopirovat suda}
for i: = 1 to 10 do begin
if a[i] mod 10 = 0 then
n: =n+1;
end;
writeln(n);
end.
Как на счет program sk; var a,b: integer; begin a: =247; b: =(a div 100) * 10-9; a: =(10*b-a) mod 10; writeln('a= ',a); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
cheropitan13.01.2022 02:38
-
mamaevseenko15.04.2022 01:47
-
zhasik133714.05.2023 07:21
-
елена121004.05.2021 02:55
-
Dariya07803.09.2020 11:06
-
renat2064864354010.02.2023 01:22
-
Sykaper16.08.2020 21:05
-
Alenadobro9724.04.2021 01:27
-
cherryyy77718.04.2021 00:52
-
Iana201010.05.2023 21:35
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.