Помогите написать прогу по информатике как можно быстрее.
"В массив вводятся результаты тестирования n учеников(целые числа от 0 до 300). Составить программу для замены введенных баллов процентами(от максимально возможного результата 300 баллов) "
Заранее большое спасибо

Program z1;var i,n:integer;a:array [1..255] of real;beginwriteln(введите количество учеников);readln(n);for i:=1 to n dobegin read(a[i]);write(     );if (a[i]<=300) and (a[i]>=0) then a[i]:= a[i]/3else writeln(не входит в условие);end;for i :=1 to n dowrite(a[i],%    );end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.