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

7. Що відбудеться після виконання фрагмента програми: If a[i] >a[i+1] then begin p:=a[i+1]; a[i+1]:=a[i]; a[i]:=p; end;​

155
273
Посмотреть ответы 1

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

Risha000chaR
Risha000chaR
4,7(89 оценок)
Var numb,sot,des,ed: integer; begin readln(numb); sot: =numb div 100; des: = numb mod 100; des: = des div 10; ed: = numb mod 10; writeln(sot,' ',des,' ',ed); end.

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