Регистрация
deniskin278
02.12.2021 19:50
Информатика
Есть ответ 👍

Впрограмме, представленной ниже допущены ошибки. найди их все, запиши правильную строку и пояснение ошибки. для удобства строки пронумерованы.
1)var mass : aray [1..15] of integer;
2)i : = integer;
3)begin
4)for i : = 15 to 1 do readln(mass[i]);
5)max : = mass[ 0 ];
6)for i : = 1 to 15 do
7) if mass > max then max : = mass[i];
8)for i : = 1 to 15 do
9)if (mass[i] mod 2 = 0) then mass[i] : = 9)max;
10)for i : = 1 to 15 do write (mass[i], ‘ ‘);
11)end.

156
197
Посмотреть ответы 2

Ответы на вопрос:

kristina33452
kristina33452
4,6(28 оценок)

ответ:

var mass : array [1..15] of integer;

i : integer;

begin

for i : = 15 to 1 do readln(mass[i]);

max : = mass[ 0 ];   // max не описано имя, индекс [0] не существует

for i : = 1 to 15 do

if mass[i] > max then max : = mass[i];

for i : = 1 to 15 do

if (mass[i] mod 2 = 0) then mass[i] : = 9;

for i : = 1 to 15 do write (mass[i], ' ');

end.

объяснение:

var mass : aray [1..15] of integer; // aray - потеряна r

i : = integer;   // лишний =

begin

for i : = 15 to 1 do readln(mass[i]);

max : = mass[ 0 ];   // max не описано имя, индекс [0] не существует

for i : = 1 to 15 do

if mass > max then max : = mass[i]; // mass > потеряно [i]

for i : = 1 to 15 do

if (mass[i] mod 2 = 0) then mass[i] : = 9)max; // )max лишние

for i : = 1 to 15 do write (mass[i], ` `); // были не те апострофы

end.

nikitamarar2177
nikitamarar2177
4,4(97 оценок)
Вдесятичной системе  = 2121002021 в двоичной  11001010101

Популярно: Информатика