Pascal ABC: 1. Приведите пример использования оператора условия. 2. Приведите пример использования оператора цикла. 3. Приведите пример использования операторов ввода-вывода.
Answers & Comments
SSSSOOOOOOSSSS
Program c2_2; var a: integer; begin write('увядіте цэлы лік'); readln(a); if (a mod 2=0) then a:=a div 2; write (a); end.
Answers & Comments
var a: integer;
begin
write('увядіте цэлы лік');
readln(a);
if (a mod 2=0) then a:=a div 2;
write (a);
end.