по информатике Вывести таблицу значений функции y=2.5*x*x+x. Значения Х задаются минимумом, максимумом и шагом. Например, если минимум задан как 1, максимум равен 3, а шаг 0.5. То надо вывести на экран изменение Х от 1 до 3 с шагом 0.5 (1, 1.5, 2, 2.5, 3) и значения функции Y при каждом значении X.

var x, y: real;

a, b, h: real;

begin

   a := 1;

   b := 3;

   h := 0.5;

   

   writeln('x':5, 'y':10);

   x := a;

   while x <= b do

   begin

       y := 2.5 * x * x + x;

       writeln(x:5, ' ', y:10:3);

       x := x + h;

   end;

end.

ДЗ для ВЕРЫ ВИКТОРОВНЫ:

Объяснение:

Var I, N, m: integer;

{Выводит таблицу квадратов до N числа}

Begin

Readln(N); //Что вводим в этой строке и зачем? Как можно подсказать пользователю, что ввести?  

{Вводим до какого числа нам нужно получить квадрат; Подсказать можно через WRITELN}

Writeln('Таблица квадратов чисел от 1 до N'); //Сколько раз выполняется этот оператор?

{Один раз}

For i:=1 to N do //Сколько раз выполнится цикл?

{N раз}

Begin //Зачем снова писать операторные скобки?

{Затем, что это цикл, который всегда обособляется и отделяет от остальных операторов}

m:=i*I;

Writeln(I,' ',m); //Как по-другому оставить пробелы между столбиками?

{Можно сделать так    -     Writeln(I:3,m:16);}

End;

End.

Какие значения чисел:
0.85Е2 =85
-5.7Е-3 = -0.0057
0.1Е4=1000

Что будет выведено на экран после выполнения следующих команд:
a-435c
c=    35.1b=   -435  280.126-435

Вычислить значения выражений:
Round(frac(6.9)); = 1
20 mod 6 * 3; = 6
sqrt(trunc(0.5)) = 0

Записать выражения в общепринятой форме:
(-3ab+(b-4*a*c)^2)/корень(2*a);
(корень(|a-b|)*(a+b)^2.

a) y:= y * 2; правильная. операция возможна для вещественных чисел.
в) х:= х mod 3 + х*cos(0); правильная, все опрации подходят для целых чисел
б) x:=trunc(y); правильная
г) x:= y+1. неверно нельзя преобразовать вещественный тип в целый