Регистрация
Александр12345678911
15.05.2020 21:04
Информатика
Есть ответ 👍

Дано натуральное число n (n> 999). найти: число сотен в нём, число тысяч в нём.в паскале abc

219
302
Посмотреть ответы 3

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

oleg173173173
oleg173173173
4,4(83 оценок)
Var s,t,n: integer; begin writeln('введите n> 999'); readln(n); s: =(n div 100); if s> 10 then s: =s mod 10; t: =(n div 1000); writeln('количество сотен--> ',s); writeln('количество тысяч--> ',t); end.
Aki0510
Aki0510
4,4(11 оценок)
Var x,n: integer; begin writeln(' введите число '); readln(x); n: =x/100; writeln(' кол во сотен ',n); readln; end.
оаилпаидшп
оаилпаидшп
4,4(78 оценок)
Компьютеры есть у 46% населения рф

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