Допустим, что a и b входят в этот промежуток.
program test;
var a, b, sum, i: integer;
begin
write('Enter two integers:');
readln(a, b);
sum:=0;
for i:=a to b do
sum:=sum+i;
write('Sum = ', sum);
readln;
end.
Компьютер жадысы бұзылмайды.
***
Айтыңызшы, сізде қандай компьютер бар, мен сіздерге кім екеніңізді айтамын.
***
Егер графикалық карта бұзылған болса, мониторда кінәратсыз ештеңе жоқ.
***
Бит килобайттар сақталады.
***
Leah проблемасы - BEGIN.
***
Бағдарламаның бірінші басталуы әрқашан сетями
1)285Кб
2)5 - но могу и ошибиться)