Презентация, доклад по информатики для 8 класса Алғы және соңғы шартты алгоритм

Else кему
To үшін
Do егер
Downto өсу
Then әйтпесе
If орындау

s: integer;
begin
writeln ( ‘берілген шаманы енгіз ‘); readln (n) ;
s: = 0;
repeat
writeln (‘товардың бағасы мен санын енгіз‘);
readln (х, к);
s:=s+x*k;
writeln (‘алынған товардың бағасы’, s);
until s>p;
writeln (‘товардың бағасы берілген шамадан артып кетті’)
readln; end.