Определяем количество символов на странице:
30*40=1200 байт=9600 бит (т.к. 8 бит =1 байту)
файл 640 кбайт равен
640*1024=655360 байт
определим количество страниц которое поместится в файл
655360/1200=546,13 страницы
следовательно, в файл поместиться 546 страниц
Считая, что в столбце A задается значение аргумента x, а в столбце B - значение функции y, можно определить, что в приведенном фрагменте таблицы вычисляется функция y = 2x.
При x=1 y=2, x=2 y=4, ... x=10 y=20
График данной функции - средний в верхнем ряду.
Ответ написан в файле.
Через логическую связку and и or не получится проверял. Только построчно.
Var n: integer;
begin
writeln('Введите число:');
readln(n);
if n mod 2 =0 then writeln('Это четное число')
else writeln('Это нечетное число')
end.
var
m:integer;
n:real;
begin
n:=120;
m:=0;
while n<150 do
begin
n:=1.02*n;
m:=m+1;
end;
writeln('Ответ: ',m)
end.
Каждый символ в зависимости от кодировки занимает 1 или 2 байта. Слово дисковод занимает значит 8 или 16 байтов. Или 64 и 128 бит.