Регистрация
xrxrxrxrxr
08.07.2020 16:16
Информатика
Есть ответ 👍

На вход поступает целое число. Выяснить является ли оно двухзначным.

или

2. На вход поступает целое число, если оно нечётное то, то умножить его на 10, иначе умножить на 5

165
434
Посмотреть ответы 2

Ответы на вопрос:

dasha240417
dasha240417
4,6(46 оценок)

1) program z1;

Var a:integer;

Begin read(a);

if (a>9) and (a<100) then writeln(a, '-двузначное число')

else writeln(a, '-не является двузначным числом');

end.

2)program z2;

var c:integer;

begin

readln(c);

if (c mod 2)=0 then writeln(c div 5) else writeln(c*10);

end.

olgadyra
olgadyra
4,5(89 оценок)
B    и     d         easy,easy,easy,easy,easy,easy,easy,easy,easy,easy,easy,easy,easy,easy,easy,easy,easy,easy ,

Популярно: Информатика