Ответ:
Нечего не понял но очень интересно
Объяснение: Что нужно исправить ?
Все, что я вижу, это ошибка в 6й строке кода.
Правильный код:
Program summa ;
var a, b, sum: integer ;
begin
writeln( 'Ведите два целых числа') ;
readln(a,b) ;
sum := a+b ;
writeln ( ' Сумма равна ' , sum) ;
end .
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Нечего не понял но очень интересно
Объяснение: Что нужно исправить ?
Все, что я вижу, это ошибка в 6й строке кода.
Правильный код:
Program summa ;
var a, b, sum: integer ;
begin
writeln( 'Ведите два целых числа') ;
readln(a,b) ;
sum := a+b ;
writeln ( ' Сумма равна ' , sum) ;
end .