Решить 'цикл со счётчиком' по икт . 3 1. среди двухзначных чисел найти сумму чисел, кратных 5. сами числа и сумму вывести на экран. 2.среди трехзначных чисел найти числа, в записи которых используется только одна цифра( например, 111), вывести на экран, подсчитать количество. 3. с клавиатуры вводится число, найти и вывести на экран все его делители. также найти количество делителей, вывести на экран.
enikandrova04
3
18.09.2019 14:00
0
Другие вопросы по теме Информатика
ASLiza1992
12.05.2020 14:47
паулодибала
12.05.2020 14:47
Юлия250501
12.05.2020 14:47
сема10
12.05.2020 08:06
marsik261
12.05.2020 08:05
mary556681p04ty3
12.05.2020 08:05
zitzcool
12.05.2020 08:05
VaBaGaBa
12.05.2020 08:03
Коля12Коля
16.04.2021 08:40
Популярные вопросы
- Алюміній масою 113 г згорів у кисні .обчисліть масу кисню і масу утвореного...
2 - Какие ученые древнего мира внесли вклад в...
3 - 7предложений на казахском языке со словом сатушы...
2 - Во втором числе из данных пар чисел увеличивали число единиц в 3 раза,...
1 - Выражение: 7,2 х + 1,8 х 1/6 х + 1/2 х 9,3 х - 1,4 х 3/4 х - 1/2 х...
1 - Твір чому я люблю подорожувати на велосипеді (на . мові)...
2 - Князь игорь внутренняя и внешняя политика, кратко...
3 - Напиши письмо хвалебного или шуточного содержания, состояния из пословиц...
2 - Обозначь орфограмму номер 6. как это сделать?...
1 - Втрех автобусах на экскурсию поехали 79 сколько детей было в каждом...
1
uses crt;
var
sum,i:integer;
begin
clrscr;
sum:=0;
for i:=10 to 99 do
begin
if i mod 5=0 then
sum:=sum+i;
end;
writeln('Сумма чисел кратных пяти=',sum);
readln;
end.
по моему как то так