1. исправить ошибки программы и вывести вместе с ответом слово «молодец.». program z1 var n – integer begin write( введи число ) read ( n) n =2*n write (‘n=’, n) end.
В операторе y:=x*x+4/x+3 используется операция деления, которая всегда возвращает вещественный тип. Следовательно, и всё выражение в правой части всегда будет иметь вещественный тип. А в левой части стоит переменная целого типа. Присваивание вещественного значения целочисленной переменной запрещено правилами языка Паскаль. Чтобы избавиться от ошибки, нужно знать алгоритм, который реализует программа. В зависимости от алгоритма может быть использована операция целочисленного деления, может быть использована функция Trunc(), возвращающая целочисленное значение аргумента, либо переменная y должна объявляться вещественной.
В операторе y:=x*x+4/x+3 используется операция деления, которая всегда возвращает вещественный тип. Следовательно, и всё выражение в правой части всегда будет иметь вещественный тип. А в левой части стоит переменная целого типа. Присваивание вещественного значения целочисленной переменной запрещено правилами языка Паскаль. Чтобы избавиться от ошибки, нужно знать алгоритм, который реализует программа. В зависимости от алгоритма может быть использована операция целочисленного деления, может быть использована функция Trunc(), возвращающая целочисленное значение аргумента, либо переменная y должна объявляться вещественной.
Program z1; {в конце этой и каждой следующей строки дописываем ";"}
Var N : integer; {вместо "-" ставим ":" и }
Begin write( 'введи число' ); { содержимое скобок берем в кавычки }
read ( N);
N :=2*N; {перед знаком "=" дописываем двоеточие}
write ('N=', N, ' молодец.'); { через запчтую дописываем в кавычках молодец}
End.