Var n, s : integer;
begin
s := 0;
while 2 * 2 <> 5 do begin
readln(n);
if n < 0 then break;
if n > 100 then s := s + 1;
end;
writeln(s);
end.
Ассемблер – <span>программа, которая переводит в машинные коды символьную запись машинных команд</span>
1 в,
2 б,
3- 8 штук: ---, --+, -+-, -++, +--, +-+, ++-,+++.
4- 4,
5-г,
6 - б
7- г
8- атхуатжа:)
Не сказанно сколько см юля но ведь девушки не выростают до токого размера
Program start;
var a:integer;
begin
readln(a);
writeln(a,a);
end.