-
Вопрос по информатике:
Составить Алгоритм поиска 4-х значного числа ,которое при делении на 133 даёт в остатке 125, а при делении на 134 даёт в остатке 111.-
Автор:
salomé
-
-
Ответ:
program senya;
var
a1, a2, a3, a4: integer;
begin
for a1 := 1 to 9 do
for a2 := 0 to 9 do
for a3 := 0 to 9 do
for a4 := 0 to 9 do
if (a1 * 1000 + a2 * 100 + a3 * 10 + a4) mod 133 = 125 then
writeln (a1,a2,a3,a4);
if (a1 * 1000 + a2 * 100 + a3 * 10 + a4) mod 134 = 111 then
writeln (a1,a2,a3,a4);
end.
Еще 4 ненужных тебе вопроса, но это важно для поиска
-
Вопрос по информатике:
Помогите исправить эту программу
program pr3;
var x:integer;
begin.
writeln('Введите оценку');
readln(x);
case x of.
1:writeln('Плохо');
2:writeln('Неудовлетворительно');
3:writeln('Удовлетворительно');
4:writeln('Хорошо');
5:writeln('Отлично');
else writeln('Ошибка');
end.-
Ответов: 1
-
-
Вопрос по информатике:
Даю 70балов
язык паскаль решите через вайл плииииз
Выведите все натуральные делители числа x в порядке возрастания (включая 1 и само число).
Входные данные
Вводится натуральное число x
Выходные данные
Выведите все делители числа x-
Ответов: 1
-
-
Вопрос по информатике:
Составить программу вычисления количества трехзначных чисел, которые при делении на 5 дают в остатке 2. (с помощью Pascal)-
Ответов: 5
-
-
Вопрос по информатике:
Pascal.Определить h - полное количество часов и m - полное количество минут, прошедших от начала суток до того момента (в первой половине дня), когда часовая стрелка повернулась на f градусов (0-
Ответов: 1
-