44
У нас есть цикл, который звучит как (пока s<=250). Изначально s=15. После мы запускаем данный цикл, и в каждом шагу добавляем 12 до тех пор, пока s не станет больше 250. И во время каждого шага мы к переменной n (изначальна равна 4) прибавляем 2. В конце программы мы выводим n.
Надеюсь я понятно объяснил. Если что-то не понятно - спрашивайте.
А)
writeln(b,'+',a,'=?');
б)
writeln('Z(',a,')=F(',b,')');
в)
writeln('a = ',a,'; b = ',b,';');
const n=10;
var a:array[1..n] of integer;
i,r: integer;
begin
write (' Исходный массив: ');
for i:=1 to n do
begin
a[i]:=random(41)-20;
write (a[i]:3,' ')
end;
writeln;
write ('Введите число: ');
readln (r);
write ('Преобразованый массив: ');
for i:=1 to n do
begin
if abs(a[i]) <= r then a[i]:=a[i]*a[i];
write (a[i]:3,' ')
end
end.