Var q,i,s:integer;
begin
readln(q);
s:=0;
i:=0;
while s<q do
begin
i:=i+1;
s:=s+i;
end;
if s=q then writeln('Страница = ',i+1)
else writeln('Ошибка ввода');
end.
Пример:
5
<span>Страница = 6</span>
Если я правильно посчитала, то ответ 4
на Pascal
program noname;
uses crt;
const
t=10;
var
a:array[1..t] of byte;
i,k:byte;
x,n:integer;
r:real;
begin
clrscr;
randomize;
x:=1; k:=0; n:=0;
for i:=1 to t do begin
a[i]:=random(20-1+1)+1;
if (a[i] mod 2=0) then x:=x*a[i]
else begin n:=n+a[i]; k:=k+1; end;
writeln ('a[',i,']=',a[i]);
end;
r:=n/k;
writeln ('произведение элементов с четным значением=', x);
writeln('ср.арифм. элементов с нечетным значением=',r);
end.
1.Смотря на назначение модели. Какие-то должны отражать размер, другие - форму, третьи - функции и т.д. В общем то, что нужно человеку в определённой ситуации
2.Глобус - это модель Земли ,упрощенное подобие реального Земного шара
3.Обьект может быть моделью, если является упрощенным подобием обьекта оригинала. Модель может быть внешней похожей на оригинал , а может быть не похожей.
4.Модель - это объект, представленный в виде информации, описывающей существенные для данного рассмотрения параметры и переменные величины объекта
Моделирование в информатике – это очень важный этап, так как он преследует массу целей. Сейчас предлагаем с ними познакомиться.
В первую очередь моделирование помогает познать окружающий нас мир. Испокон веков люди накапливали полученные знания и передавали их своим потомкам. Таким образом появилась модель нашей планеты (глобус).
На самом деле любой пункт верный, но в твоём случае это 1