ответ: у тебя не правильное .в начале нужно найти максимальное число не оканч.на 3 , а потом вывести макс. число оканчивающееся на 3.ты разберись. но если ты шаришь в икт и просто не знаешь , как задать условие ,то там нужно через целые и кратные (div/mod) в твоем случае будет как-то так
if a mod 10=3 and a> max then max: =a
ну если ты ленивая жо#а то вот:
var a,b,k,max: integer;
begin
writeln('введите количество чисел > > n ');
readln(n);
max: =0;
for k: = 1 to n do;
begin
writeln('введите числа > > a ');
readln(a);
if (a mod 10=3) and (a> max) then max: =a
end;
writeln('самое больше число оканчивающееся на 3 -',max)
end.
в полной правильности я не уверен(т.к у меня нету паскаля),проверь компилятором
ответ: у тебя не правильное .в начале нужно найти максимальное число не оканч.на 3 , а потом вывести макс. число оканчивающееся на 3.ты разберись. но если ты шаришь в икт и просто не знаешь , как задать условие ,то там нужно через целые и кратные (div/mod) в твоем случае будет как-то так
if a mod 10=3 and a> max then max: =a
ну если ты ленивая жо#а то вот:
var a,b,k,max: integer;
begin
writeln('введите количество чисел > > n ');
readln(n);
max: =0;
for k: = 1 to n do;
begin
writeln('введите числа > > a ');
readln(a);
if (a mod 10=3) and (a> max) then max: =a
end;
writeln('самое больше число оканчивающееся на 3 -',max)
end.
в полной правильности я не уверен(т.к у меня нету паскаля),проверь компилятором
Объяснение:
1) 512 * 1024(чтобы перевести в килобайты) * 1024(чтобы перевести в байты) * 8(чтобы перевести в биты) = 2^9 * 2^10 * 2^10 * 2^3 = 2^32
2) 128 * 1024(в мб) * 1024(в кб) * 1024(в байты) = 2^7 * 2^10 * 2^10 * 2^10 = 2^37
3) 32 * 1024(в байты) * 8(в биты) = 2^5 * 2^10 * 2^3 = 2^18
4) 2^39 бит / (8 (в байты) * 1024(в килобайты) * 1024(в мегабайты) * 1024( в гб) = 2^39 / ( 2^3 * 2^10 * 2^10 * 2^10) = 2^39 / 2^33 = 2^6 = 64
5) 2^35 байт / ( 2^10(в кб) * 2^10(в мб) ) = 2^35 / 2^20 = 2^15
6) 2^27 бит / ( 2^3(в байты) * 2^10(в кб) * 2^10(в мб)) = 2^27 / 2^23 = 2^4 = 16