Початок задумайте, число ,додайте 6 ,зменшать на 4,число ділиться на 2? додати 1 ,поділити на 2 ,поділити на 2 ,кінець Це задача по Паскаль
Pузик
2
15.09.2020 05:13
0
Другие вопросы по теме Информатика
KVERCXI
28.04.2020 06:36
creator4567
28.04.2020 06:35
joryk2012
28.04.2020 08:20
катя5062
14.08.2019 14:10
Гуманитарий41
28.01.2021 09:17
Manya081505
12.09.2019 22:30
lsrk
12.09.2019 22:30
Nicol03
06.06.2019 15:50
Nasteckay
06.06.2019 15:50
Популярные вопросы
- Закончите уравнения хим.реакций: n2+h2= nh3+hno3=; nh3+o2 =; caco3+hcl=;...
3 - Почему при использовании для борьбы с сельскохозяйственными вредителями...
1 - Task two. (total score – 9) put the verbs in brackets in the appropriate...
3 - Треугольник авс ав=10см уголв=105градусов угола=30градусов вс-?...
2 - Тело массой 0,2кг падает с высоты 1м с ускорением 8м/с2. найти изменение...
2 - Решить уравнение (х-121*37): 89=36,69...
2 - Решите неравенство методом интервалов (x-1)(x-4)(x-8)(x-16) 0...
2 - Нужно дано и решение объёмная доля метана в природном газе уренгойского...
3 - Уморских свинок розеточная или шерсть (ген а) доминирует над гладкой...
3 - Несколько коротышек встретились в парке.каждая с каждой поздоровались...
3
var x: integer;
begin
writeln('напишите число');
readln(x);
x:=x+2;
if x mod 2 = 1 then x:=x+1 ;
x:=x div 2;
writeln(x);
end.