6. Есептің шарты берілген, программасын өзің құр. Дененің жылдамдығы мен уақыты берілген. Жүріп өткен жолын табатын программа құр. 7. Құрылған программаның қатесін тап. Program uekyt;
Var I,U,A:integer; t:real;
Begin real(I,U,A);
t:=A/*U*I
writ(t)
end.
8. Программасы құрылған, шартын жаз Program jumyc;
Var P,t:integer; A:real;
Begin read(P,t);
A:=P*t/S+v;
Write(A);
End.
10. Программаның басы мен аяғы берілген, денесін құрастыр Program tygyzdyk;
Var m,v:integer; p:real;
Begin read(m,v);
…………
Write(p);
End.
11. Есептің шарты берілген, программасын құр Егер дененің массасы мен тығыздығы белгілі болса, онда оның көлемін табатын программа жаз.
12. Есептің программасы құрылған, шартын жаз. Program kuat;
Var A,t:integer; n:real;
Begin read(A,t);
N:=A/t;
Write(n);
End.