var
a, b: <em>integer</em>;
begin
assign(input, 'input.txt');
assign(output, 'input.txt');
reset(input);
rewrite(output);
readln(input, a, b);
if (a mod 2 = 1) then
writeln(output, b mod 2)
else
writeln(output, '0');
close(input);
close(output);
end.
///Pascal abc.
Самый простой способ (программа в файлике);
Проверка:
Введите число: 547
Результат: 745
Var x,y:real;
begin
write('x = ');
readln(x);
y:=x/3;
writeln('y = ',y);
end.
Пример:
x = 15
y = 5
<u>Периферийные устройства компьютера.</u> Периферией называются все внешние дополнительные устройства, подключаемые к системному блоку компьютера через специальные разъемы.По назначению периферийные устройства можно подразделить наустройства ввода данных;устройства вывода данных;устройства хранения данных;устройства обмена данными.Устройства ввода данныхКлавиатура;Мышь, трекбол или тачпад;Джойстик;Сканер;Графический планшет (дигитайзер).
<u>Внутреннее устройство компьютера.</u> <span>Когда говорят о внутреннем устройстве компьютера, обычно имеют в виду те компоненты, которые находятся внутри его корпуса.
</span><span>1. Системная плата
</span><span>2. Процессор
</span><span>1. Блок питания
</span><span>2. Оперативная память
</span><span>4. Видеокарта
</span><span>5. Сетевая карта
</span>6. Звуковая карта
<span>7. Жесткий диск
</span><span>8. Оптический привод
</span>9. Блок питания<span>
как то вот так! =)</span>
1) 128 цветов
2) что такое квадроаудиофайл я не знаю, но скорее всего это вдвое круче стерео, тогда 1,52 Мб
3) основание системы счисления 9