Значки рахуємо по маленьких стрілках внизу, але викидаємо значок папки My Pictures, це не програма. Одже їх D) 7.
Program n1;
var
x:integer;
begin
writeln('Введите число'); readln(x);
if (x mod 4=0) then writeln('Является') else writeln('Не является');
end.
program n2;
var
a,b:integer;
begin
writeln('Введите первое число'); readln(a);
writeln('Введите второе число'); readln(b);
if a>b then writeln(a*b*2,' ',(a+b)/2) else writeln((a+b)/2,' ',a*b*2);
end.
Циклическим называется алгоритм,предусматривающий повторения одних и тех же действий в зависимости от условия итераций.
А) (а+б) - 2*а*б
б) 6*а*а + 15*а*б - 13*б*б
в)а*а - б*б