Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var a, b, s, i : integer;
begin
write('введите а-');
readln (a);
write('введите b-');
readln (b);
s: =0; for i: = a to b do s: =s + i * sqr(i);
writeln ('сумма кубов =', s)
end.
var
x,y,z: longint;
readln(x,y,z);
if (x> 100)or(y> 100)or(z> 100) then writeln('false')
else writeln('true');
если массив состоит из 10 элементов то код программы:
const
n=10;
a: array[1..n] of integer;
i,min: integer;
for i: =1 to n do read(a[i]); {вводишь заданный массив}
min: =32767;
for i: =1 to n do
if a[i]< min then min: =a[i];
write(min);
end;
нет,так как это не текствовый документ ,а картинка,и компьютер читает отсканированный файл картинкой а не текстом!
Популярные вопросы