Есть ответ 👍

Добавь звуковой эффект и для того чтобы?​

186
401
Посмотреть ответы 2

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

vipmopmop
4,8(4 оценок)

для того что бы что???????


program r1; var n: integer; beginassign(input,'input.txt'); reset(input); assign(output,'output.txt'); rewrite(output); readln(n); if n> 0 then n: =n+1 elsen: =abs(n mod 2) ;   {примечание-остаток будет положительным)writeln(n); close(input); close(output); end.

 

2

program r1; var n,l: integer; beginassign(input,'input.txt'); reset(input); assign(output,'output.txt'); rewrite(output); readln(n); if (n mod 10)> (n div 10) then writeln('2> 1') elseif (n mod 10)< (n div 10) then writeln('2< 1') elseif (n mod 10)=(n div 10) then writeln('2=1'); close(input); close(output); end.

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