Program P1;
uses
Graph,Crt;
var
d,m,i,k : integer;
x,y,x0,y0,r : integer;
a,b : real;
begin
2 клетки. Потому что в условии описан квадрат, окаймление которого - пустота. Данным условиям удовлетворяет только 2 варианта:
С4 и D4. Во всех остальных случаях - беда)
1 Прежде всего, это сочетание звуковой и графической информации.
2Предметные модели позволяют представить в материальной наглядной форме объекты и процессы, недоступные для непосредственного исследования (очень большие или очень маленькие объекты, очень быстрые или очень медленные процессы и др.).
Макеты зданий и сооружений позволяют архитекторам выбрать наилучшие градостроительные решения, модели самолетов и кораблей позволяют инженерам выбрать их оптимальную форму.
3...
4 Моделирование представляет собой один из основных методов познания, является формой отражения действительности и заключается в выяснении или воспроизведении тех или иных свойств реальных объектов, предметов и явлений с помощью других объектов, процессов, явлений, либо с помощью абстрактного описания в виде изображения, плана, карты, совокупности уравнений, алгоритмов и программ
Var a,b,c,d:integer;
begin
writeln('Введите числа');
readln(a,b,c);
if (a mod 2=0) then d:=a;
if (b mod 2=0) then d:=d+b;
if (c mod 2=0) then d:=d+c;
if d<>0 then writeln('Сумма чётных чисел равняется ',d)
else writeln('Нет чётных чисел');
<span>end.</span>
Пока s<=1000 выполняем действия:
S=s*3 и n=n+3
Выводим в конце n
Получается
1) s=1*3=3, n=0+3=3 и в следующем шаге подставляем уже эти значения
2) 9, 6 в следующем шаге подставляем уже эти значения и т.д.
3) 27, 9
4) 81, 12
5) 243, 15
6) 729, 18
7) 2187, 21
S>1000 и происходит выход из цикла
Ответ: 21
