М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ElenaBorova
ElenaBorova
11.04.2022 01:46 •  Информатика

Вывести на экран все трехзначные натуральные числа, сумма цифр которых не превосходит заданное пользователем (введенное с клавиатуры) число. pascal abc для 8 класса функцией или процедурой

👇
Ответ:
nadgvcdg
nadgvcdg
11.04.2022
Var s,i:integer;
begin
write('s = ');
readln(s);
for i:=100 to 999 do
 if (i div 100 + i div 10 mod 10 + i mod 10 < s)
  then write(i,' ');
end.

Пример:
s = 5
100 101 102 103 110 111 112 120 121 130 200 201 202 210 211 220 300 301 310 400
4,6(81 оценок)
Ответ:
Ніка64
Ніка64
11.04.2022
9 + 9 + 9 = 27, при вводе числа, больше 27 будут выведены все трёхзначные числа.

Procedure ABC(A:integer);
Var i:integer;
Begin
For i:= 100 to 999 do
    if (i div 100)+((i div 10) mod 10)+(i mod 10)<=A then
       Write(i,' ');
End;
Var A:integer;
Begin
Write('Введите целое число: ');
ReadLn(A);
ABC(A)
End.

Пример:

Введите целое число: 7
100 101 102 103 104 105 106 110 111 112 113 114 115 120 121 122 123 124 130 131 132 133 140 141 142 150 151 160 200 201 202 203 204 205 210 211 212 213 214 220 221 222 223 230 231 232 240 241 250 300 301 302 303 304 310 311 312 313 320 321 322 330 331 340 400 401 402 403 410 411 412 420 421 430 500 501 502 510 511 520 600 601 610 700
4,4(39 оценок)
Открыть все ответы
Ответ:
Ekaterina8887
Ekaterina8887
11.04.2022

li = []

elements = 1

negative_index = 0

positive_index = 0

print("Введите 0 что бы остановить ввод")

while elements != 0:

   elements = int(input("Введите элементы списка\n"))

   li.append(elements)

li2 = li[:]

li2.sort()

length = li.__len__()

print(li)

for i in range(0, length-1):

   for j in range(length-1, 1, -1):

       if li2[i] * (-1) == li2[j]:

           for k in range(0, length-1):

               if li2[i] == li[k]:

                   negative_index = k

               if li2[j] == li[k]:

                   positive_index = k

if negative_index < positive_index:

   print("Индекс противоположного числа(1) ->", negative_index)

   print("Индекс противоположного числа(2) ->", positive_index)

elif negative_index == positive_index == 0:

   exit(0)

else:

   print("Индекс противоположного числа(1) ->", positive_index)

   print("Индекс противоположного числа(2) ->", negative_index)

P.S

Код не идеальный, но задачу выполняет

4,4(27 оценок)
Ответ:
pudish
pudish
11.04.2022

1) 1.Системная плата.

2.Блок питания.

3.Центральный процессор

4.Оперативная память

5.Видеокарта

6.Сетевая карта

7. Звуковая карта

8.Жесткий диск

2) Материнская плата - это основная плата компьютера. На ней расположены столы и разъёмы для подключения комплектующих ПК, таких как: видеокарты, оперативная память, процессор, накопители данных, а также периферии.

3) 1.ОЗУ

2.Видеокарта

3. Жёсткий диск

4.Питание

5.Дополнительная устройства

6.PS/2. ...

7.COM порт

4) a) хранения информации

b) ввод и выдачу информации

c) обработку информацию

d) управление работой ЭВМ по заданной программе

4,4(91 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ