program z1;
var a,b,k,i:integer;
begin
k:=0;
write('Ââåäèòå êîîðäèíàòó à: ');
read(a);
write('Ââåäèòå êîîðäèíàòó b: ');
read(b);
for i:=a to b do begin
if i mod 3=0 then begin
writeln(i);
k:=k+1;
end;
end;
writeln('Количество чисел кратных трём равно ',k);
readln;
end.
Правильный ответ Тепловоз
* N = 800
* N = 2i - формула
* 800 = 2i
9 < i < 10, берем в большую сторону, i = 10 - вес одного кода.
* 320 кодов = 320 * 10 = 3200 бит. Переведем в байты:
3200/8 = 400 байт.
Ответ: 400
я не помню паскаль:(
Объяснение:
вводишь число a
через if проверяешь условие
if(a>7) то a:=a*10
else if (a<7) то а:=а+7
1. face= <font> "Название шрифта"</font>
2. border ="Число" ширина таблица
3. Цвет ячейки bgcolor="Цвет"
4.1 Количество строк
4.2 Количество столбцов - атрибут cols="Число"