if
ифода
then
1-оператор
else
2-оператор
Масалан: А ва В сонлари берилган.
Икки соннинг каттасини топиш.
агар А>В булса ,
max:=A
акс холдаmax:=B
тугади
Program ИСКT;
Var a,b,y: integer;
begin
readln(a,b);
if a>b then y:=a else y:=b;
writeln(‘y=‘,y);
end.
3
-5
У=3
D=b2-4ac
X1=
X2=
алг кв айлана
Арг S1,S2
нәт у
боши
киритиш (S1,S2)
А:=4S1-π S2
агар А<=0
унда у:=“айлана кв сиғади”
акс холда у:=“айлана кв сиғмайди”
тугади
Чиқариш у
тамом
var s1,s2,a,y:real;
begin
writeln(‘s1,s2 engis’);
readln(s1,s2);
a:=4*s1-3.14*s2;
If a<=0 then writeln(‘y:=cigdi’)
else writeln(‘y:=cigmaidi’);
end.
4
5 / 0.3/
Cimaidi
1
2 /-2/
ciadi
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть