Любомир
7 год назад
Задача 1. Дан вес груза в килограммах (четырехзначное натуральное число). Найти количество полных тонн в нем и вывести на экран.
Задача 2. У трехзначного натурального числа справа зачеркнули одну цифру, какое число получилось? Вывести получившееся число на экран.
Задача 3. (повышенной сложности, по желанию) У двузначного натурального числа приписали разряд сотен справа. Вывести получившееся число на экран. (Например: было число 123, приписали 1 справа, получилось число 1231.)
ОТВЕТЫ
Bronislav
Jul 18, 2019
1.
алг
нач
цел а
ввод а
вывод div(a, 1000), тонн
кон
2.
var x, i: integer;
begin
write(Введите трёхзначное число: );
readln(x);
if ( x lt;100 ) OR ( xgt;100 ) then writeln(Число не трёхзначное!)
else
begin
i :=x mod 10; write(i)
write(x div 100);
write(x div 10 mod 10);
end;
end.
3.
алг
нач
цел а
ввод а
вывод div(a, 1000), тонн
кон
2.
var x, i: integer;
begin
write(Введите трёхзначное число: );
readln(x);
if ( x lt;100 ) OR ( xgt;100 ) then writeln(Число не трёхзначное!)
else
begin
i :=x mod 10; write(i)
write(x div 100);
write(x div 10 mod 10);
end;
end.
3.
Было число ав
Стало число 2ав2
Разложим его на разряды
2ав2=2*1000+а*100+в*10+2=2002+100а+10в
По условию задачи это в 32 раза больше исходного двузначного числа ав, т.е.:
32ав=2ав2 ( Число ав тоже разложим на разряды, получим 10а+в)
32(10а+в)=2002+100а+10в
32(10а+в)=2002+10(10а+в)
32(10а+в)-10(10а+в)=2002
22(10а+в)=2002
10а+в=2002:22
10а+в=91
Итак, искомое число 91
250
