Я правильно понял:нужно составить визуальную программу или на языке программирования?
Системный блок компъютера
var d:real;
i,k:integer;
Begin
k:=0;
for i:= 1 to 3 do begin
writeln("Введит число");
read(d);
if (d<0) then k:=k+1;
end;
writeln(k);
End.
Для кодирования 7 различных символов потребуется
бита.
Если пароль состоит из 14 символов, то для него потребуется 14х3=42 бита.
Но, поскольку, пароль занимает целое число байт, потребуется 42/8 ≈ 6 байт
40 таких паролей займут объем 40х6=240 байт.
Ответ: 240 байт
Program privet1;
var
k : integer;
begin
write('Введите номер курса: ');
readln(k);
if k = 1 then
writeln('Привет, первокурсник')
else if k = 2 then
writeln('Привет, второкурсник')
else if k = 3 then
writeln('Привет, третьекурсник')
else if k = 4 then
writeln('Привет, четверокурсник')
else if k = 5 then
writeln('Привет, пятикурсник');
end.