"Ойлан, тап"
"Ойлан, тап"
"Ойлан, тап"
Паскаль бағдарламаның тілінде сызықтық бағдарлама жасамас бұрын келесі түсініктемеге тоқталайық:
С ө з ж ұ м б а қ
С ө з ж ұ м б а қ
С ө з ж ұ м б а қ
С ө з ж ұ м б а қ
С ө з ж ұ м б а қ
С ө з ж ұ м б а қ
С ө з ж ұ м б а қ
С ө з ж ұ м б а қ
С ө з ж ұ м б а қ
Программаның жалпы түрі:
басы
соңы
енгізу
серия
шығару
Блок-схема:
Мысал: Екі бүтін санды қосып, қосындысын экранда шығару.
Радиусы R-ге тең шеңбер берілген. Шеңбердің ұзындығын есептеу программасын құр
І-топ «BEGIN»
ІІ-топ «WRITE»
х нақты сан берілген,
t функциясының х-ке
сәйкес мәнін есептейтін
программа жазу керек.
t =
program M3;
Var x,t:real;
begin
write ('x=');
read (x);
t:=1/cos(x)+ln(abs(arctan(x/2)))+x/(1+x);
write ('',t:6:2);
End.
Program SHRenber;
Const PI=3.14159;
Var L: Real ;
R: Integer;
Begin
Writeln;
Read (R);
L:=2*Pi*R;
Writeln('',L);
End.
Program esep 1;
Var a, b, x, y:integer;
Begin Write (‘a. b- сандарын енгіз’);
Readln (a, b);
X:=sqr (a+b);
Y:= a*b;
Writeln (‘x=’, x);
Writeln (‘y=’, y);
End.
k =(x2 + y2) * x+y, мұндағы функциясының мәнін есептейтін программа құру керек.
Program esep 2 ;
Var k:real;
Const x = 5;
y = 2.8;
Begin
K: = sqr (x) + sqr(y)* sqrt (x+y);
Writeln (‘k = ‘, k);
End.
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть