Есть ответ 👍

Мне нужно сделать контрольную с информатики а я ничего не знаю

131
192
Посмотреть ответы 1

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


Program project; uses   crt; var   x,d: integer; begin   clrscr;   write('x=');   readln(x);   d: =(x div 1000) mod 10;   writeln('d=',d); end.

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