Лучшие помощники
- Megamozg 2190 б
- Matalya1 1800 б
- DevAdmin 1695 б
- arkasha_bortnikov 860 б
- Dwayne_Johnson 845 б
2 апреля 2023 13:24
330
Перепишите программу на языке Паскаль, исправив ошибки: 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
·
Хороший ответ
4 апреля 2023 13:24
Остались вопросы?
Еще вопросы по категории Информатика
Выбери верные ответы. Достоинства растровой графики: Масштабирование (в частности, увеличения) изображения с потерей качества. Неточная передача цве...
Определите значения переменных a и b после выполнения программного кода: s='Никогда не ошибается тот, кто ничего не делает.' с=s[2:4]+s[5]...
Дано: молярная масса вещества M, плотность данного вещества P, масса R или объём V. Требуется найти число молекул K: 1) в единице массы вещества; 2) в...
Помогите !СРОЧНО!дано дерево каталогов. назовите полное имя файла Doc3...
Задание 3 Решите задачу: матричный принтер имеет скорость печати 512 бит в секунду. Сколько времени нужно затратить на рас-печатку 10 страниц, если ка...
Все предметы