Задание №2 по дисциплине «Информатика»



style="display:block"
data-ad-client="ca-pub-0562610021414947"
data-ad-slot="5792664354"
data-ad-format="link">

Решить задачу: с использованием условного оператора.
Составить программу вычисления функции
formula

program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils;
var x,f,x1,x2,x3:real;
begin
writeln ('vvedite X');
readln (x);
if x<0 then
begin
x1:=-4;
writeln (x1:2:0);
end;

if (0<=x) AND (x<1) then begin x2:=sqr (x)+3*x+4; writeln (x2:2:0); end; if (x>=1) then
begin
x3:=sqr (sqr (x)+3*x+4);
writeln (x3:2:0);
end;
readln;
end.

Популярность: 1% [?]



style="display:inline-block;width:468px;height:60px"
data-ad-client="ca-pub-0562610021414947"
data-ad-slot="7620109552">

About admin

Speak Your Mind

Tell us what you're thinking...
and oh, if you want a pic to show with your comment, go get a gravatar!

Подтвердите, что Вы не бот — выберите человечка с поднятой рукой: