Question

Дана программа на языке Паскаль. В программе выполняется вычисление значения выражения , где –вещественные числа, – целое число. В программе намеренно допущены ошибки. Необходимо найти, исправить их и переписать верный вариант программы.
program solve;
var;
i : integer;
begin;
writeln (`Введите целое число` i `);
readin (i) ;
writeln (`Введите целые числа` a, b, c `) ;
readin (a, b, c) ;
S = (a+b+c)/i
writeln (`S= `, S)
end ;
Помогите пожалуйста)

Answer 1

Ответ:

Верный код:

program solve;

var

i, a, b, c : integer; S: real;

begin

writeln ('Введите целое число', i );

readln (i) ;

writeln ('Введите целые числа` a, b, c ') ;

readln(a, b, c) ;

S := (a+b+c)/i;

writeln ('S= ', S)

end.

Объяснение:

Ошибки выделены полужирным:

program solve;

var;

i : integer;

begin;

writeln (`Введите целое число`, i `);

readin (i) ;

writeln (`Введите целые числа`, a, b, c `) ;

readin (a, b, c) ;

S := (a+b+c)/i ;

writeln (`S= `, S)

end ;

Ошибки:

1. Нет регистрации переменных a, b, c в третьей строке (переменные целого типа) и регистрации S как переменной вещественного типа.
2. После "var" и "begin" точка с запятой не должна стоять.
3. Вместо "readin" требуется написать "readln" (ошибка в букве) - 6 и 8 строки.
4. В скобках вызова функции "writeln" (5 и 7 строки) используется лишняя кавычка перед названием переменных
5. Отсутствует двоеточие перед присваиванием S нового значения. Также нет точки с запятой в конце строки.
6. В скобках последнего вывода используются не те кавычки.
7. После слова "end" должна стоять точка, а не точка с запятой.