Задание:
Саставце программу, которая формирует массив из 10 случайных вещественных чисел, что лежат в промежутке [4, 5), и выводит числа с 3-го по 7-й в столбик сдвумя десятичными цифрами Пожалусто помагите
Решение:
Вот код: uses crt; var a: array[1… 10] of real; i: integer; begin for i: =1 to 10 do begin a[i]: =random*9 — 4; end; for i: =3 to 7 do begin writeln ('a[',i,']=',a[i]: 0:2); end; writeln ('Press enter'); readln; end. Пояснения: у тебя в условии промежуток [4,5) означает что 5 нельзя включать (скорее всего ошибка). Есл это не ошибка переписывания условия, то добавляется еще одна линия, и программа получается: uses crt; var a: array[1… 10] of real; i: integer; begin randomize; for i: =1 to 10 do begin a[i]: =random*9 — 4; if (a[i]=5) then a[i]: =4,9999; end; for i: =3 to 7 do begin writeln ('a[',i,']=',a[i]: 0:2); end; writeln ('Press enter'); readln; end. Обрати внимание, я еще добавил randomize; команду — она гарантирует, что случайные числа будут именно случайными
Знаете другой ответ?