// Задание №1
var
a,s: integer;
begin
a:=300;
repeat
s:=s+a;
a:=a+2;
until a>400;
writeln('s = ', s)
end.
// Задание №2
var
a: integer;
begin
a:=100;
repeat
if a mod 8 = 0 then write(a:4);
a:=a+1;
until a>999;
end.
Мне кажеться 2 правильно,а это в каком приложении надо сделать?
Ответ:
Уберите точку с запятой. перед else
Объяснение:
If <Операторы>
else <Операторы>
1045'2128 пикселей это 2.223.760 битов
2.223.760/8=277970 байтов
288970/1024=271 килобайт
Один символ 1 байт
на одной странице 30*70=2100 символов
84000:(2100*8)=5