Регистрация
Гулзат1111
13.11.2021 05:48
Информатика
Есть ответ 👍

const n=100

program Zadacha1;

ver a: array [1.. n] of real;

x:: real; i: integer;

began;

writeln (Введите элементы массива');

for i;= 1 to n do red (a [i]);

writeln ('Введите значение для посика')

read (x);

for i:=1 to n do

if a[i] == x then

writeln ('на ', i, 'месте массива находится заданный элемент', x:8:2);

enn!

180
188
Посмотреть ответы 2

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

Алиса345780
Алиса345780
4,8(5 оценок)

const n=100;

program Zadacha1;

ver a: array [1.. n] of real;

x:: real; i: integer;

begin;

writeln ('Введите элементы массива');

for i = 1 to n do red (a [i])

writeln ('Введите значение для поиcка')

read (x);

for i:=1 to n do

if a[i] == x then

writeln ('на ', i, 'месте массива находится заданный элемент', x:8:2);

end!

Объяснение:

В первой строке пропустил ";".

В пятой написал began, а правильно begin.

В седьмой между i и = не должна быть ";", при этом для цикла for нельзя ставить ";".

В восьмой не посика, а поиска, еще забыл ";".

И на последней строчке не enn, a end.

Кабасена05
Кабасена05
4,6(65 оценок)

а)-3результативность б)-1массовность, в)-2дискретность

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