1.Найдите ошибки в программе и напишите верный вариант программы: program a7;

begin

var a, b c integer;

real(a, b);

c:=sqr a;

writeln(’выведите значения величин a и bʼ);

writeln((a+b+c):4);

end.
2.В окне вывода результатом выполнения команды

write (’сумма чисел 10+20=’) будет:

а) сумма чисел 10+20=30; б) сумма чисел =30;

в) сумма чисел 10+20=.

В программе a7 есть несколько ошибок. Вот исправленный вариант программы:

program a7;

var

a, b, c: integer; // нужно разделить объявление переменных запятыми

begin

readln(a,b); // заменим real(a,b) на readln(a,b), чтобы прочитать значения a и b

c:=sqr(a); // добавим пропущенную скобку после a, чтобы выполнить возведение в квадрат

writeln('выведите значения величин a и b');

writeln((a+b+c):4);

end.

ответ на второй вопрос: результатом выполнения команды write('сумма чисел 10+20=') будет вариант (в): сумма чисел 10+20=. Если вы хотите вывести результат сложения чисел 10 и 20, нужно дополнить команду write соответствующим значением, например, так: write('сумма чисел 10+20=', 10+20);. Тогда в окне вывода будет выведено "сумма чисел 10+20=30".