Дано все двузначные числа. найти количество и сумму кратных 5 (язык паскаль)
217
408
Ответы на вопрос:
Var i: integer; k : = 0; s : = 0; begin for i : = 10 to 99 do if i mod 5 = 0 then begin s : = s + i; k : = k + 1; end; writeln('количество = ', k, ' и сумму = ', s); end.
ответ:
var i: integer;
mas: real;
begin
{ а}
mas: =0.75;
for i: =1 to 6 do begin
mas: =mas*2.6-0.6;
end;
write(mas);
{ b}
mas: =0.75;
i: =0;
repeat
mas: =mas*2.6-0.6;
inc(i);
until mas> 9.0
write(i);
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ксю1530415.01.2021 13:00
-
ХозяинНосочков17.04.2021 17:12
-
ария2718.05.2020 23:21
-
FarmFarm07.01.2023 16:44
-
KOMAPyKOTA15.09.2021 11:32
-
SHAHRUKH57506.06.2022 08:23
-
КристинаМазова13.03.2023 11:48
-
maks200310y615.05.2020 17:06
-
soz2019oy63um08.04.2022 06:36
-
SERYK1130.11.2022 16:59
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.