Каталог- предмет, который содержит информацию о местонахождении определенных предметов.
Байт-единица передачи информации, в которую входит 8 бит.
Интернет-всемирная компьютерная сеть, дающая доступ к специалезированным информационным серверам.
Архив- сжатый объект, файл.
Счеты-простое механическое устройство для произведения арифметических расчётов, являются одним из первых вычислительных устройств.
Информация-сведения, которые можно хранить в определенном месте.
Абак- доска для осуществления арифметических действий.
Система счисления записи чисел и соответствующие ему правила действия над числами.
1в.
1)Код Pascal
begin
write('N = ');
readln(N); { <-- вводим трехзначное число }
writeln;
N := N mod 100; { <== Последние две цифры }
{ Выводим последнюю и среднюю цифры числа: }
writeln('Последняя цифра: ', N mod 10);
writeln('Средняя цифра: ', N div 10);
readln
end.
2)
var
N: word; { Трехзначное число }
t1, t2, t3: byte; { Цифры трехзначного числа }
write('Введите трехзначное число: ');
t3 := N mod 10; { <== третья цифра }
N := N div 10; { <== число созданное первыми двумя цифрами }
t2 := N mod 10; { <== вторая цифра }
t1 := N div 10; { <== первая цифра }
writeln('Сумма цифр: ', t1 + t2 + t3);
Каталог- предмет, который содержит информацию о местонахождении определенных предметов.
Байт-единица передачи информации, в которую входит 8 бит.
Интернет-всемирная компьютерная сеть, дающая доступ к специалезированным информационным серверам.
Архив- сжатый объект, файл.
Счеты-простое механическое устройство для произведения арифметических расчётов, являются одним из первых вычислительных устройств.
Информация-сведения, которые можно хранить в определенном месте.
Абак- доска для осуществления арифметических действий.
Система счисления записи чисел и соответствующие ему правила действия над числами.
1в.
1)Код Pascal
begin
write('N = ');
readln(N); { <-- вводим трехзначное число }
writeln;
N := N mod 100; { <== Последние две цифры }
{ Выводим последнюю и среднюю цифры числа: }
writeln('Последняя цифра: ', N mod 10);
writeln('Средняя цифра: ', N div 10);
readln
end.
2)
var
N: word; { Трехзначное число }
t1, t2, t3: byte; { Цифры трехзначного числа }
begin
write('Введите трехзначное число: ');
readln(N); { <-- вводим трехзначное число }
writeln;
t3 := N mod 10; { <== третья цифра }
N := N div 10; { <== число созданное первыми двумя цифрами }
t2 := N mod 10; { <== вторая цифра }
t1 := N div 10; { <== первая цифра }
writeln('Сумма цифр: ', t1 + t2 + t3);
readln
end.