1) 1/1024 Мб=1 кб 1000 байт меньше
2) 5500000б больше 512 кб, но меньше 1Мб
3)13 байт 1/16 Кб =64 б
4)<span>600000 Мб больше 512Гб(1/2Тб)
</span>5)<span>2000000000 байт =2Гб т.е. больше 1Гб, но меньше 1Тб</span>
Ответ: сообщение состоит из 20 символов, то есть из 20 байтов, потому что 1 символ - 8 бит,а 8 бит-1 байт.
Var h1,m1,s1,h2,m2,s2,t:integer;
begin
write('Start: ');
readln(h1,m1,s1);
write('Finish: ');
readln(h2,m2,s2);
t:=(h2*3600+m2*60+s2)-(h1*3600+m1*60+s1);
writeln(t);
end.
Пример:
<span>Start: 11 20 30
Finish: 13 15 40
6910</span>
1) Первое задание:
var a: integer;
begin
write ('Введите число: ');
readln (a);
if (a mod 2 = 0) then
writeln ('Четное число')
else writeln ('Не четное');
readln;
end.
2) Второе задание:
program test;
var a: integer;
begin
write ('Введите число: ');
readln (a);
if a > 0 then
a:= a + 1;
if a < 0 then
a:= a - 2;
if a = 0 then
a:= 10;
writeln (a);
end.
1)тест1.doc
Тест.doc
2)с:\games\happy\pacman.exe
3)c:\pictures\foto\весна.jpg
4)столбец, абзац, строка
5)редактирования