Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Спасайте.:зх

5-9 класс

Одномерный массив из 6 элементов с номерами от 4 до 9 заполнить случайным образом числами от 1 до 10. Все элементы массива,значения которых меньше 5,уменьшить на единицу.Вывести на экран монитора первоначальный и преобразованный массивы в сточку.

Timowa 29 дек. 2014 г., 7:41:52 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Jamkajaka
29 дек. 2014 г., 9:44:57 (9 лет назад)

var
a: array [4..9] of longint;
q:longint;
begin
for q:=4 to 9 do
begin
a[q]:=random(10)+1;
write(a[q],' ');
end;
writeln();
for q:=4 to 9 do
begin
if a[q]<5 then a[q]:=a[q]-1;
write(a[q],' ');
end;
end.

Ответить

Другие вопросы из категории

Решите пожалуйста прошу:)

Читайте также

Спасите очень нужноооооо
Спасите.....................
Самолет находиться на высоте 5000 метров. Обнаружилась неисправность работы двигателя. Самолет начал падать. Бортовой комьютер производит диагностику

неисправности и сообщает пилоту о необходимых действиях. Для решения этой задачи ему нужно выполнить 10(8) (в восьмых) вычислительных операций. Быстродействие компьютера 1 млн оп/сек. успеет ли летчик спасии самолет если минимальная высота, на которой самолет можно вывести на пике 2000 метров?



Вы находитесь на странице вопроса "Спасайте.:зх", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.