А) A1*A1*A1+A2*A2*A2+A3*A3, где а1,а2,а3 ячейки с а,b,c
Program pascal;
var n :longint;
begin
writeln ('Введите число:');
read(n);
if n>0 then
if n mod 10 =0 then writeln('Число ',n,' кратное 10')
else
writeln('Число ',n,' не кратное 10');
end.
Ответ Г. Словесные модели позволяют обрисовать объект до мельчайших деталей. пример: объект - классический стиль в одежде. модель: образы, которые помогают понять что это такое.(пиджак, платье,строгость, спокойные тона и т.д.)
Вроде так ...............