skalegin68

25.11.2021

Написать программу, которая найдет сумму чисел, кратных 5 на интервале от 8 до 80

Информатика

Ответить

Ответы

veravlad

25.11.2021

var i, s: integer;

begin

s := 0;

for i := 8 to 80 do

if i mod 5 = 0 then

s := s + i;

write(s)

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Написать программу, которая найдет сумму чисел, кратных 5 на интервале от 8 до 80

▲

Написать программу, которая найдет сумму чисел, кратных 5 на интервале от 8 до 80

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

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

НУЖНА ПО ИНФОРМАТИКЕ ЗА ОТВЕТ НУЖНО СДЕЛАТЬ НЕСКОЛЬКО ПРОГРАММ В PASCALABC.NET. ЗАРАНЕЕ БЛАГОДАРЮ ВАС ЗА ПРАВИЛЬНЫЙ - (ЫЕ) ОТВЕТЫ!

Запиши названия окон, в которых отображаются следующие объекты.AbbyAirplaneAmonAnina Hip-HopAZ Hip-HopBallBall-SoccerBallerina

Дано: writeln (s:6:2); Если s=113, 32085, то на экране появится :

Барлығын көрсет: 1Кіші компьютер2Дербес компьютер3Суперкомпьютер4Үлкен компьютер

Для хранения текста требуется 10 кбайт. сколько страниц займет этот текст, если на странице размещается 40 строк по 64 символа в строке?

Что здесь не так? 22 строчка: Форматное выражение Сама программа Program Srednee_W1; Uses Crt; Var n: integer; x, y, h, s, s1, xk:real; Begin ClrScr; x:=0; xk:=3.1; h:=0.1; s:=0.0; n:=0; While x<=x...

Напечатать числа следующим образом 25 25.5 24.8 26 26.5 25.8 . . 35 35.5 34.8 в паскале

3. В одном Кбайте содержится: А) 1024 байтВ) 256 битC) 1024 МбайтD) 64 байтE) 678 бит

Выполните деление двоичных чисел 1001011111100 и 101101 100

решить быстрее щас проверочная, а я не знаю как сделать

Определите результат выполнения программы a=153 z3=a%10 a=a//10 z2=a%10 print(z3+z2+a//10)

Написать программу, которая найдет сумму чисел, кратных 5 на интервале от 8 до 80

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

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

НУЖНА ПО ИНФОРМАТИКЕ ЗА ОТВЕТ НУЖНО СДЕЛАТЬ НЕСКОЛЬКО ПРОГРАММ В PASCALABC.NET. ЗАРАНЕЕ БЛАГОДАРЮ ВАС ЗА ПРАВИЛЬНЫЙ - (ЫЕ) ОТВЕТЫ!

Запиши названия окон, в которых отображаются следующие объекты.AbbyAirplaneAmonAnina Hip-HopAZ Hip-HopBallBall-SoccerBallerina​

Дано: writeln (s:6:2); Если s=113, 32085, то на экране появится :

Барлығын көрсет: 1Кіші компьютер2Дербес компьютер3Суперкомпьютер4Үлкен компьютер

Для хранения текста требуется 10 кбайт. сколько страниц займет этот текст, если на странице размещается 40 строк по 64 символа в строке?

Что здесь не так? 22 строчка: Форматное выражение Сама программа Program Srednee_W1; Uses Crt; Var n: integer; x, y, h, s, s1, xk:real; Begin ClrScr; x:=0; xk:=3.1; h:=0.1; s:=0.0; n:=0; While x&lt;=x...

Напечатать числа следующим образом 25 25.5 24.8 26 26.5 25.8 . . 35 35.5 34.8 в паскале

3. В одном Кбайте содержится: А) 1024 байтВ) 256 битC) 1024 МбайтD) 64 байтE) 678 бит​

Выполните деление двоичных чисел 1001011111100 и 101101 100

решить быстрее щас проверочная, а я не знаю как сделать

Определите результат выполнения программы a=153 z3=a%10 a=a//10 z2=a%10 print(z3+z2+a//10)

Запиши названия окон, в которых отображаются следующие объекты.AbbyAirplaneAmonAnina Hip-HopAZ Hip-HopBallBall-SoccerBallerina

Что здесь не так? 22 строчка: Форматное выражение Сама программа Program Srednee_W1; Uses Crt; Var n: integer; x, y, h, s, s1, xk:real; Begin ClrScr; x:=0; xk:=3.1; h:=0.1; s:=0.0; n:=0; While x<=x...

3. В одном Кбайте содержится: А) 1024 байтВ) 256 битC) 1024 МбайтD) 64 байтE) 678 бит