Постоянная ошибка - Free Pascal

Узнай цену своей работы

Формулировка задачи:

Делаю простые арифметические действия выдает это постоянно: Вот собственно простой код: 
program how;
var
x,y: real;
begin
x:=1;
y:= 1+x;
writeln(y);
end.

Решение задачи: «Постоянная ошибка»

textual
Листинг программы 
uses crt;
var
x,y:integer;
begin
clrscr;
x:=1;
y:= 1+x;
writeln(y);
end.

Объяснение кода листинга программы

  1. Установка директивы использования библиотеки CRT (File).
  2. Объявление двух целочисленных переменных x и y.
  3. Очистка экрана с помощью функции clrscr.
  4. Присвоение переменной x значение 1.
  5. Присвоение переменной y значение 1+x.
  6. Вывод значения переменной y на экран с помощью функции writeln.
  7. Конец программы.

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

11   голосов , оценка 4.182 из 5
Похожие ответы