Function HOD(a: integer; b: integer): integer;
// Нахождение НОД
var
i: integer;
begin
while b <> 0 do
begin
a := a mod b;
i := b; b := a; a := i
end;
HOD := a
end;
var
A, B, C: integer;
begin
Write('Введите через пробел значения A,B,C: '); Readln(A, B, C);
Writeln('НОД(A,B,C)=', HOD(HOD(A, B), C))
end.
<u>Тестовое решение:</u>
Введите через пробел значения A,B,C: 1532 628 388
НОД(A,B,C)=4
Var s : real;
Begin
S:= (1*14-1/3)*52;
Write(s :5:6);
end.
Смешно, конечно, но выходит так. Просто выводишь определённую формулу, вот и все.
Найдите неотрицательную разность двух чисел, если сумма этих чисел равна их произведению и разности их квадратов. На сколько натуральных чисел от25 марта 2012
2. Найдите неотрицательную разность двух чисел, если сумма этих чисел равна их произведению и разности их квадратов.
3. На сколько натуральных чисел от 1 до 1000 меньше, нежели четных натураль-ных чисел от 1 до 2012?4. Точка O центр параллелограмма ABCD. Луч выходит из вершины A, делит по-полам отрезок BO и пересекает сторону BC в точке E. Во сколько раз длина от-резка BE меньше длины отрезка CE?5. Найдите сумму 60(x + y), если 4x2+ 9y2= 10, 2xy = 1.6. Числа от 1 до 16 написаны по одному на 16 карточках разного цвета. Петя и Вася берут себе карточки с условием, что если взял карточку, то надо себе за-брать и все карточки того же цвета. Так одни цвета достались одному, другие –другому. Каждый подсчитал сумму чисел на своих карточках. Они оказались разными. Стали они думать, как надо было брать карточки, чтобы суммы оказа-лись равными, и пришли к выводу, что такого способа не существует. Какое наименьшее число цветов карточек могло быть?7. На сколько процентов надо увеличить зарплату Пете, чтобы он стал получать в 2,5 раза больше, нежели получает сейчас?8. Сколько трёхзначных чисел N, обладающих следующим свойством: из цифр числа N можно составить шесть различных двузначных простых чисел?9. Сколько целых значений A, при которых сумма модулей выражений 2A – 100 и 150 – A принимает значения от 150 до 400 (включая 150 и 400)?10. Парабола f (x) = 2x2+ bx + c пересекает ось OX в точках с абсциссами 10 и 2012. <span>Найдите ординату пересечения параболы с осью OY</span>
<span>
</span>
10 битов, 2 байта, 20 битов, 1010 байтов, 1кбайт
Распишу полностью (результат после каждой строки)
1)
x y t
5 . .
5 7 .
5 7 5
2 7 5
Ответ: 2; 5; 5.
2)
a b
75 .
75 12
3 12
Ответ: 3; 12.
3)
x y
336 .
336 8
42 8
42 2
Ответ: 42; 2.
4)
a b
5 .
5 30
5 75
Ответ: 75
5)
a b
7 .
7 28
7 98
Ответ: 98
6)
a b c
6 . .
6 15 .
3 15 .
3 15 12
Ответ: 12
7)
a b c
40 . .
40 10 .
40 20 .
40 20 20
Ответ: 20
