Вопрос по информатике:
Чем можно заменить var(k,n,h):=ReadInteger3; в этой программе
const
c='123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ';
begin
var(k,n,h):=ReadInteger3;
for var row:=1 to k do
for var height:=1 to h do
begin
var s:string:=c[height]*height+' ' *(h-height);
writeln(s*n);
end;
end.
Версия паскаля 3.3 сборка 1547
- 08.07.2015 00:59
- Информатика
- remove_red_eye 10460
- thumb_up 50
Ответы и объяснения 1
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.