В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
nataliasuflik
nataliasuflik
25.05.2021 23:58 •  Информатика

Қандай бағдарлама кодын қарастырғаннын жазыңыз:

screen = pygame.display.set_mode((600, 500), 0, 32)

pygame.display.set_caption("My First Game")

Показать ответ
Ответ:
valera555132
valera555132
17.01.2023 15:09
Var H1:array[1..5] of integer;
    H2:array[1..8] of integer;
    N1:array[1..5] of integer;
    N2:array[1..8] of integer;
    i, j:integer;

begin
randomize;
for i:=1 to 5 do {заполняем массивы}
 begin
 H1[i]:=random(10);
 N1[i]:=random(10);
 end;
for i:=1 to 8 do
 begin
 H2[i]:=random(10);
 N2[i]:=random(10);
 end;
for i:=1 to 5 do {сравниваем продукцию}
 for j:=1 to 8 do
 if N1[i]=N2[j] then writeln(i, ' и ', j, ' Выпускают одинаковую продукц.');
write('H1 ');{выводим массивы}
for i:=1 to 5 do
write(H1[i], ' ');
writeln;
write('N1 ');
for i:=1 to 5 do
write(n1[i], ' ');
writeln;
write('H2 ');
for i:=1 to 8 do
write(H2[i], ' ');
writeln;
write('N2 ');
for i:=1 to 8 do
write(N2[i], ' ');
writeln;
end.
0,0(0 оценок)
Ответ:
KykuCat
KykuCat
13.04.2021 19:08

ок) так много ) я решу)

ты немного непонятно написал условие, я написал два варианта...

1) если нужно посчитать сумму трёхзначных чисел которые заканчиваются на 7 и делятся на 3 без остатка

sum = 0

n = int(input))

while n != 0:

if len(str(n)) == 3 and n % 3 == 0 and n % 10 == 7:

sum += n

n = int(input))

print(sum)

2) если нужно посчитать сумму чисел которые либо трёхзначные либо заканчиваются на 7 либо кратны 3

sum = 0

n = int(input))

while n != 0:

if len(str(n)) == 3 or n % 3 == 0 ot n % 10 == 7:

sum += n

n = int(input))

print(sum)

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота