A - номер квартиры, начиная с 1
n - этаж
C:
n = 2*((a-1)/12)+2+((а-1)%12)/7
Pascal:
n := 2*((a-1) div 12)+2+((a-1) mod 12) div 7
выражение в одну строку
% это остаток от деления
a и n переменные целого типа, подразумевается, что происходит автоматическое округление при делении в меньшую сторону
<span />ПРОГРАММЫ ИДУТ ПО ПОРЯДКУ ДЛЯ КАЖДОГО НОМЕРА
program _1;
var a,b:integer;
begin
write ('введите количество килограмм ' );
readln (a);
b:=a div 100;
writeln (b, ' полных центнеров ' );
end.
program _2;
var a,b:integer;
begin
write (' введите массу в килограммах ');
readln (a);
b:= a div 1000;
writeln (b, ' полных тонн ');
end.
program _3;
var a,b : integer;
begin
write (' введите расстояние в метрах ');
readln (a);
b: a div 1000;
writeln (b, ' полных километров: ' );
end.
1)
40*60*176=422400 символов или байт
422400/1024=412,5 Кб
2)Можно решить устно: 350+350+350+350=1400.
Значит 4 учебника поместиться
Дом-дым
мел-мол
тик-так
пил-пол
сыр-сэр
сон-сын
суд-сад
дул-дол