Впаскале и без функции рандома, . дан массив целых чисел. вывести индексы тех элементов, значения которых кратны 3 и 5.
216
368
Ответы на вопрос:
Const n = 20; var a: array[1..n] of integer; i: integer; begin for i: =1 to n do readln(a[i]); for i: =1 to n do if (a[i] mod 3 = 0) and (a[i] mod 5=0) then writeln('elem nomer ' , i) end.
Неправильно считает секунды, в чём ошибка?
var
s,m,h,days: integer;
begin
writeln('Введите кол-во дней');
read(days);
s:=86400;
m:=s div 60;
h:=m div 60;
for var i:=1 to days do
s:=s*days;
m:=m*days;
h:=h*days;
writeln(s,' — секунд в ',days,' днях');
writeln(m,' — минут в ',days,' днях');
writeln(h,' — часов в ',days,' днях');
end.
Объяснение:
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
veder111oy2x7103.05.2022 12:49
-
fernandus08.12.2020 21:58
-
крут677601.03.2020 05:58
-
lord5018.09.2022 10:23
-
Glazkovanuriya02.02.2023 02:17
-
AgentRuba10.10.2021 07:29
-
remizov01107.09.2022 08:15
-
Bars199506.04.2022 04:27
-
Nastya113837310.02.2021 20:27
-
AdamM221.04.2021 17:06
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.