Написать программу, которая выводит таблицу квадратов ....например, яблок в диапазоне от 100 г до 1 кг с шагом 100( нужно с циклом while)

Const h=0.1; a=0.1; b=1; var f,x: real; begin writeln (Таблица значений функции: ); x:=a; while x<=b do begin f:=x*x; writeln (Вес, x:6:2, Квадрат:6,f:6:2); x:=x+h; end; end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.