Ответ учителя по предмету Информатика
var mass:array[1..12] of integer;
i:integer;
begin
randomize;
for i:=1 to 12 do begin
mass[i]:=163+random(28);
writeln(‘рост ‘,i,’ =’,mass[i]);
end;
end.
Пример работы:
рост 1 =167
рост 2 =168
рост 3 =186
рост 4 =167
рост 5 =170
рост 6 =170
рост 7 =173
рост 8 =175
рост 9 =168
рост 10 =179
рост 11 =174
рост 12 =188
Похожие вопросы от пользователей
Григорий может вспахать всё поле за
Решите пожалуйста!
Однажды… Аполлон, бог света и искусств дал задание философу Зоилу написать отзыв на произведения Гомера «Илиада» и «Одиссея». Зоил … поручение выполнил. Аполлон прочитал придирчивую критику философа. Тот не увидел красоты. А ведь он… стоял перед морем красоты. Аполлон в награду дал ему мешок непросеянной пшеницы и приказал выбрать за свой труд всю мякину, то есть мусор. Зоил стал… символом пустой и злобной критики.