Помогите выстроить блок схему к программке,пожалуйстаProgram Cikl;var a,b,h,x1,x2,y:real;
Помогите выстроить блок схему к программке,пожалуйста
Program Cikl;
var a,b,h,x1,x2,y:real;
begin
writeln ('введите a');
readln (a);
writeln ('введите b');
readln (b);
writeln ('введите x1');
readln (x1);
writeln ('введите x2');
readln (x2);
writeln ('введите h');
readln (h);
while x1lt;=x2 Do
begin
if (x1lt;1.4)
then y:=3.14*x1*x1-7/x1*x1
else
if x1=1.4
then y:=a*x1*x1+7*sqrt(x1*x1-1)
else y:=(a+b*x1)/sqrt(x1*x1+1);
writeln (x1,y);
x1:=x1+h;
end
end.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
начерти прямоугольник со сторонами 6см.2см.и закрась его три восьмых доли
Разные вопросы.
векторы a,b образуют угол фи=пи/6; зная, что |a|=корень из 3, bха=3,
Алгебра.
Придумай два прямоугольника, чтобы периметр первого был вдвое больше, чем периметр
Математика.
Придумай два прямоугольника, чтобы периметр первого был вдвое больше, чем периметр
Математика.
Используя карту кубанские земли и Причерноморье в. 18 в. На стр.
Кубановедение.
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
Облако тегов