Новые вопросы по информатике
Написать программу, которая выводит на экран результаты следующих действий: 27-5= 11+21= 32/2= 2+2*2= (2+2) * 2= Написать программу, которая выводит на экран результаты следующих действий: 21-4= 21+11= 43/3= 3+3*3= (3+3) * 3=
Вариант 2 1. Даны три числа. Найдите сумму второго и третьего числа. Найдите квадрат первого числа. 2. Даны длины сторон прямоугольника. Найдите площадь прямоугольника. 3. Даны длины катетов прямоугольного треугольника.
Найдите периметр треугольника.
Почему при А=1, В=1, С=1 ответ АVВ равно 1?
2. Какое значение будет иметь переменная b после выполнения следующих операторов присваивания: a:=3; b:=a+9; b:=a+b; b:=a-b+b/a. 3.
Найдите наиболее точное общее имя каждой группе объектов: з) клавиатура, сканер, мышь
Главная » Информатика » Написать программу в python: найдите все пятизначные числа, которые при делении на 133 дают в остатке 125, а при делении на 134 дают в остатке 111.
Источник: iotvet.com
17 задание в Excel | Информатика ЕГЭ 2023 — Артем Имаев
Помогите пожалуйста решить задачу по информатике под номером 2 (по массивам). Решая эту задачу напишите чтобы была расписана каждая строчка что в ней происходит. ПОЖАЛУЙСТА.
#def ocenki():
«»» В спортивных соревнованиях 10 судей выставили свои оценки
спортсмену. Итоговая оценка определяется так: самая наибольшая и
самая наименьшая оценки из общей суммы удаляются (если таких оценок
несколько, то удаляется только одна из них), затем среди оставшихся
подсчитывается среднее арифметическое. Написать программу, которая
позволила бы по известным оценкам судей автоматически выставлять
итоговую оценку спортсмену.»»»
# Введем 10 оценок судей в память
a = []
for i in range(10):
a.append(input(«Очередная оценка спортсмену: «))
# Отсортируем оценки по возрастанию:
a.sort()
# Удалим из списка минимальную оценку
a.pop(0)
#Удалим максимальную оценку
a.pop(-1)
# Напечатаем на экране среднее арифметическое (оценку)
print «Оценка спортсмену: «,
print float(sum(a)) / len(a)
print «-«*30, «nnnЗадача 2.»
# Завершение работы
#def chisla():
«»» Напишите программу поиска четырехзначного числа,
которое при делении на 133 дает в остатке 125,
а при делении на 134 дает в остатке 111.»»»
# Резервируем место для найденных чисел, при делении которых
# на 133 в остатке получается 125
a = []
# будем перебирать все множители от 0 до числа, которое при
# умножении на 133 даст 10000. Нам больше не надо.
ПРАКТИКА #6 — Задачи на ЗАМЫКАНИЯ closures | Swift | Xcode | Apple | iOS | macOS | iPad | iPhone
for i in range(0, 10000/133):
# Добавим число, которое при делении на 133 дает в остатке 125
# в список
a.append(i * 133 + 125)
# В список попали трехзначные числа и, может быть, и пятизначные.
# Отфильтруем его, оставив в нем только четырехзначные
a = filter(lambda x: 999 < x < 10000, a)
# Теперь рассмотрим числа, которые при делении на 134 дают в
# остатке 111.
for i in range(0, 10000/134):
# Если нам попадется число, которое уже есть в списке а, то
# напечатаем его
if (i * 134 + 111) in a:
print i * 134 + 111
# Вот и всё. Программа завершила работу
В приложении результат работы программы
Источник: reshimne.ru
Написать программу поиска четырехзначного числа которое при делении на 133
1. Найти ошибки в программе, которая выводит на экран кубы чисел из промежутка от 1 до 10
Program q2
Var
Begin
ClrScr;
For k=1 to 10 do
a = SQR(k)*k;
Writeln(a);
End.
2.Написать программу поиска четырехзначного числа, которое при делении на 133 дает в остатке 125, а при делении на 134 дает в остатке 111
Program pr2;
Uses Crt;
Var a,b:Integer;
Begin
ClrScr;
For k:=1000 to
Begin
a:=k mod ;
:= mod 134;
If (a=) (b=) Then Writeln();
End;
Readln;
End.
3. Найти двузначные числа, разность цифр которых по абсолютной величине равна 1
Program pr_3;
Uses Crt;
Var :Integer;
Begin
ClrScr;
k:= to do
a:= ;
b:=
If ABS( — ) = Then
Writeln();
Readln;
End.
Регистрация: 19.12.2008
Сообщений: 5,788
Program q2; uses crt; Var a,k : longint; Begin ClrScr; For k:=1 to 10 do begin a:= SQR(k)*k; Writeln(a); end; readln; End.
Program pr2; Uses Crt; Var a,b,k:Integer; Begin ClrScr; For k:=1000 to 9999 do Begin if (k mod 133 = 125) and (k mod 134 = 111) then writeln(k); End; Readln; End.
uses crt; var i,j : integer; begin clrscr; for i:=1 to 9 do for j:=0 to 9 do if abs(i-j)=1 then writeln(i,j); readln; end.
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем.
___________________________________ ___________________________________ _______
[=Правила форума=] _____ [Поиск] _____ [Литература по С++] ____ [Литература. Паскаль]
Источник: www.programmersforum.ru