Найти ошибку в следующей программе program - ErrorsMaster.ru - большая энциклопедия ошибок и их решений

Привет,челики!)Помогите,пожалуйста!Заранее огромное спасибоооо!
1)Найдите ошибку в следующей программе:
program a1;
var c: integer;
begin
c:=4.75;
writeln (‘c=’, c)
end.
2)Установите соответствие между операторами и результатами их выполнения, если значение переменной равно 5.
write (a)
a
write (‘a’)
a=5
write (‘a=a’, a)
5

Остались вопросы?

Новые вопросы по предмету Математика

Источник

Не уверен в ответе?

Найди верный ответ на вопрос ✅ «Найдите ошибки в следующей программе: Program int_r; Var a, x: integer; b, c: real; Begin a:=10; b:=5.2; x:=b div 2; c: = round (x); End. …» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.

Искать другие ответы

Источник

Найдите ошибку в программе.
program al;
var c: integer;
begin
c:4,75
writeln (,c=,c)
end.

Остались вопросы?

Новые вопросы по предмету Математика

Источник

Найдите ошибки в следующей программе :

Program int_r ;

Var a, x : integer ; b, c : real ;

Begin

a : = 10 ;

b : = 5.

2 ;

x : = b div 2 ;

c : = round (x) ;

End.

Вы открыли страницу вопроса Найдите ошибки в следующей программе :Program int_r ;Var a, x : integer ; b, c : real ;Begina : = 10 ;b : = 5?. Он относится к категории
Информатика. Уровень сложности вопроса – для учащихся 5 — 9 классов.
Удобный и простой интерфейс сайта поможет найти максимально исчерпывающие
ответы по интересующей теме. Чтобы получить наиболее развернутый ответ,
можно просмотреть другие, похожие вопросы в категории Информатика,
воспользовавшись поисковой системой, или ознакомиться с ответами других
пользователей. Для расширения границ поиска создайте новый вопрос, используя
ключевые слова. Введите его в строку, нажав кнопку вверху.

Источник

ILMAR

0 / 0 / 0

Регистрация: 24.10.2010

Сообщений: 23

Найти ошибку в программе

27.03.2011, 16:01. Показов 824. Ответов 6

Метки нет (Все метки)

Pascal

  var s:real;
i,e,a,q:integer;
B:array[1..5,1..10] of integer;
begin
 randomize;
for i:= 1 to 10 do
for e:= 1 to 5 do
B[i,e]:=random(4)+2;
writeln;
  for i:= 1 to 10 do  begin
for e:= 1 to 5 do
write(B[i,e]:4);
writeln;
  end;
s:=0;
for i:= 1 to 5 do begin
for e:= 1 to 10 do s:=s+B[i,e];
  s:=s+s;
s:=s/10;
writeln(s:2:1);
s:=0;
end;

не могу понять где ошибка, он выводит среднее число строки, а надо чтобы он считал среднее число столбца

Programming Эксперт 94731 / 64177 / 26122 Регистрация: 12.04.2006 Сообщений: 116,782	27.03.2011, 16:01
6

14 / 14 / 4

Регистрация: 08.03.2011

Сообщений: 107

27.03.2011, 16:21

естесственно, что ошибка в строке — for e:= 1 to 10 do s:=s+B[i,e]; странно, что у вас еще ошибку не выдает — выход за пределы массива… Обменяйте местами i и e в квадратных скобках, т.е. for e:= 1 to 10 do s:=s+B[e,i];

0 / 0 / 0

Регистрация: 24.10.2010

Сообщений: 23

27.03.2011, 16:32

[ТС]

Azazello7,
Программа выдает 5 ответов, как сделать ,чтобы ответы выводились отдельно?

iama

1337 / 988 / 119

Регистрация: 30.07.2010

Сообщений: 5,297

27.03.2011, 16:39

ILMAR,

Pascal

1	writeln(s + ' ':2:1);

0 / 0 / 0

Регистрация: 24.10.2010

Сообщений: 23

27.03.2011, 17:14

[ТС]

iama,
Как эти пять ответов вывести на экран в порядке возрастания?

1337 / 988 / 119

Регистрация: 30.07.2010

Сообщений: 5,297

27.03.2011, 20:40

ILMAR, суйте их в массив — и пузырьком

14 / 14 / 4

Регистрация: 08.03.2011

Сообщений: 107

28.03.2011, 08:41

кстати, а почему Pascal Abc не выдает ошибку? ILMAR, у вас объявлен массив на 5 строк и 10 столбцов, вы же его заполняете, будто в нем 10 строк и 5 столбцов… Надо бы согласовать как-нибудь, сколько же в действительности в матрице столбцов и строк. На всякий случай: первый индекс — i — отвечает за количество строк, второй — e — за кол-во столбцов…

Источник