Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 865 б
3 апреля 2023 09:36
437
Перепишите программу на языке Паскаль, исправив ошибки: Program primer Var a,b: integer; Begin ; ReadLn( a,b); s=a+b; m:=a*b; d:=a:b; WriteLn(s); WriteLn(m); WriteLn(d) End
1
ответ
Ошибки в программе:
Program primer - не хватает точки с запятой
Var a,b: integer;
Begin ; - не ошибка, необязательная точка с запятой
ReadLn( a,b); - не ошибка, лишний пробел после скобки, здесь и дальше не хватает пробелов между аргументами функций, знаками
s=a+b; - не хватает двоеточия в :=
m:=a*b;
d:=a:b; - переменная d не была описана; деление - это /
WriteLn(s);
WriteLn(m);
WriteLn(d)
End - не хватает точки.
Исправленная программа:
Program primer;
Var a, b: integer;
d: real;
Begin
ReadLn(a, b);
s := a + b;
m := a * b;
d := a / b;
WriteLn(s);
WriteLn(m);
WriteLn(d)
End.
Program primer - не хватает точки с запятой
Var a,b: integer;
Begin ; - не ошибка, необязательная точка с запятой
ReadLn( a,b); - не ошибка, лишний пробел после скобки, здесь и дальше не хватает пробелов между аргументами функций, знаками
s=a+b; - не хватает двоеточия в :=
m:=a*b;
d:=a:b; - переменная d не была описана; деление - это /
WriteLn(s);
WriteLn(m);
WriteLn(d)
End - не хватает точки.
Исправленная программа:
Program primer;
Var a, b: integer;
d: real;
Begin
ReadLn(a, b);
s := a + b;
m := a * b;
d := a / b;
WriteLn(s);
WriteLn(m);
WriteLn(d)
End.
0
·
Хороший ответ
5 апреля 2023 09:36
Остались вопросы?
Еще вопросы по категории Информатика
Сколько треугольников в фигуре, изображённой на рисунке? ...
Помогите пожалуйста 1. Выберите правильные варианты вывода элементов массива на печать в строку. 1)for i:=1 to n do write (a[i], ` ` ) 2)for i:=1...
помогите пожалуйста решить задачу по информатике с объяснением!! Определить номера строк матрицы R[M, N], хотя бы один элемент которых равен c, и эл...
Объем сообщения равен 11 Кбайт.сообщение содержит 11264 символов.Какова мощность алфавита?...
Написать задачи на языке Pascal: 1. Возвести число в квадрат. 2. Даны три числа. Найти среднее арифметическое трех чисел. 3. Найти значение выражения...