Массив D состоит из n элементов, которые вводятся с клавиатуры. Найдите количество его нулевых элементов (Паскаль)
101
486
Ответы на вопрос:
var a,b: integer;
function f(a,b: integer): integer;
begin
if (a< > 0) and (b< > 0) then begin
if (a> b) then
a: =a mod b else
b: =b mod a;
f(a,b);
end else
writeln(abs(a-b));
end;
begin
writeln('введите 2 натуральных числа');
readln(a,b);
write('нод(',a,',',b,') = ');
f(a,b);
end.
Популярно: Информатика
-
asli12109.03.2023 17:46
-
zlatovlaska07.10.2022 02:33
-
ИгорьВсемогущий11.12.2020 23:38
-
sanjabr82oymx7f26.11.2020 18:16
-
danikru5625.12.2022 13:19
-
Дима1531301.02.2020 17:43
-
alievaaytan1704.08.2022 10:03
-
Timoxa56504.07.2020 05:08
-
yaaaaaaan25.04.2020 22:58
-
садов1911.06.2023 14:32