Определите названия инструментов с которых можно разворачивать и перемещать объекты в
129
458
Ответы на вопрос:
1) Г;
2) Б;
3) А;
4) Г;
5) А;
6) В;
7) Г;
8) В;
9) В;
10) А; Б; В; Е; Д;
11) А;
12) Б;
13) В;
14) Г.
Объяснение:
Program pr1;
var ch:integer; sum:byte;
(*рекурсия нахождения суммы цифр числа*)
function f_sum(ch:integer):integer;
begin
if ch=0 then f_sum:=0
else f_sum:=(ch mod 10) +f_sum(ch div 10);
end;
begin
writeln('Введите число');
readln(ch);
sum:=f_sum(ch);
writeln('Сумма цифр- ',sum);
end.
var ch:integer; sum:byte;
(*рекурсия нахождения суммы цифр числа*)
function f_sum(ch:integer):integer;
begin
if ch=0 then f_sum:=0
else f_sum:=(ch mod 10) +f_sum(ch div 10);
end;
begin
writeln('Введите число');
readln(ch);
sum:=f_sum(ch);
writeln('Сумма цифр- ',sum);
end.
Популярно: Информатика
-
imaria130.06.2021 19:14
-
Nikita1240907.11.2020 06:57
-
veronikageletii08.03.2022 17:02
-
11111Ангелина1111125.09.2022 06:40
-
KllaBer08.04.2021 02:56
-
sanekmmg198002.12.2020 22:13
-
Полина11200606.06.2022 01:10
-
Анастасия411130.01.2022 00:43
-
danyaсс15.06.2020 07:53
-
Rustem111227.11.2020 22:28