Вопрос по информатике:
Помогите пожалуйста!!! Решить задачу в Паскале. Это срочно. Заранее спасибо!
- 10.07.2018 00:50
- Информатика
- remove_red_eye 14514
- thumb_up 6
Ответы и объяснения 1
Program n1; var a, x: integer;begina:=random(9999);writeln(a);if a>999 then x:=a div 1000;if (a99) then x:=a div 100;if (a9) then x:=a div 10;if a<10 then x:=a;writeln(x);end.
- 01.01.1970 00:00
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.