var
s : integer;
begin
for var i := 0 to 1000 do if i mod 2 > 0 then s += i;
writeln('s=', s);
end.
var
n : integer;
begin
write('введите n=');
readln(n);
for var i := 1 to n do write(i, ' ');
end.
var d, m:integer;
var h:real;
begin
readln(d);
m := d * 2;
h := m / 60;
m := m mod 60;
write('Количество часов = ' + Int(h) + ' количество минут = '+ m)
end.
Photomath вот это приложение
Модель-наглядное представление объекта, то есть у модели ни одинаковый рамер например с реальным объектом.
5 байт=40 бит
8 килобайт=8192 байт
1 мегабайт=131072 байт
88 бит=11 байт
<span>5120 терабайт =5242880 гигабайт</span>