program kursovaya_rabota;
var
a, b : longint;
begin
b := 100111111;
write ('Умножьте два двоичных числа: 01101 и 001011 - и введите ответ: ');
readln (a);
if b = a then
writeln ('Ответ верен')
else
writeln ('Ответ неверен');
end.
хз мб и древний паскаль, препод сказал сделать =) А в проге получается не должны вычисляться числа 01101 и 001011. Т.е Их сам считаешь и вводишь результат?
День добрый, такое дело, срочно нужна лаба, времени что бы самому разбираться и делать нет....
Нужна программа для Решения Систем линейных уравнений(СЛАУ). Метод Последовательных исключений Гаусса! Язык Исполнения С(С++)
Вообще это и нагуглить можно, но как сказал уже времени нет. Буду ООчень благодарен =)
Последний раз редактировалось Sharingan; 24.02.2008 в 19:23..