Вывести таблицу значений функции

22.04.2012, 16:20. **Показов** 1178. **Ответов** 2

Author24 — интернет-сервис помощи студентам

Написать программу, которая выводит таблицу значений функции у=|х|. Диапазон изменения аргумента: от -4 до 4, шаг аргумента – 0,5.

@Krot-buterbrod · 22.04.2012, 16:51

Pascal

var x: real;
begin
     x:=-4;
     writeln('   x |    y');
     repeat
         if x>=0 then write(' ');
         writeln(x:1:1,' | ',abs(x):1:2);
         x:=x+0.5;
     until x=4;
     readln;
end.

22.04.2012, 19:18

Сообщение от Krot-buterbrod

var x: real;
begin
x:=-4;
writeln(' x | y');
repeat
if x>=0 then write(' ');
writeln(x:1:1,' | ',abs(x):1:2);
x:=x+0.5;
until x=4;
readln;
end.

выдает ошибку 89

Добавлено через 1 час 41 минуту
ап!!!

Добавлено через 16 минут
а сори все норм

Motorjkee
		1
	Вывести таблицу значений функции 22.04.2012, 16:20. Показов 1178. Ответов 2 Метки нет (Все метки) Написать программу, которая выводит таблицу значений функции у=\|х\|. Диапазон изменения аргумента: от -4 до 4, шаг аргумента – 0,5.

Motorjkee
	22.04.2012, 19:18	3
	Сообщение от Krot-buterbrod var x: real; begin x:=-4; writeln(' x \| y'); repeat if x>=0 then write(' '); writeln(x:1:1,' \| ',abs(x):1:2); x:=x+0.5; until x=4; readln; end. выдает ошибку 89 Добавлено через 1 час 41 минуту ап!!! Добавлено через 16 минут а сори все норм

Вывести таблицу значений функции

Решение