Что эта программка делает? Program v1;Var k,i:integer;Begink:=0;If i mod 3=0 then

Что эта программка делает? Program v1;
Var k,i:integer;
Begin
k:=0;
If i mod 3=0 then k:=k+1;
Writeln(k);
End.

Задать свой вопрос
1 ответ
READLN (X) ; IF X MOD 2=0 THEN WRITELN(X*X+(SQRT2)) ELSE WRITELN(X*X*X+X) END. 
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт