, с информатикой, вот такое вот задание: Из натурального трехзначного числа удалить заданную цифру. Число и цифру вводить с клавиатуры.
Пытаюсь написать программу, но что-то в ней не так - кто знает, подскажите, что именно, вот мой код для решения:
program chislo;
var ch, xy, z: integer;
writeln('введите трёхзначное число:');
readln(ch);
writeln('введите цифру, которую нужно удалить из числа:');
readln(x);
if z=ch mod 10 then
begin
xy:=ch div 10;
writeln('полученное двухзначное число равно ', xy);
end;
else if z=(ch div 10) mod 10 then
begin
xy:=(ch div 100)*10+ch mod 10;
writeln('полученное двухзначное число равно ', xy);
else if z=ch div 100 then
begin
xy:=ch mod 100;
writeln('полученное двухзначное число равно ', xy);
end;
else writeln('такой цифры в числе нет');
end.

Под понятием «бумажный документ» мы подразумеваем информацию, зафиксированную на бумажном носителе и обладающую определенными реквизитами, такими как, например, дата, подпись. К особенностям бумажного документа можно отнести его привязку к материальному носителю.

Электронный же документ не осязаем и не имеет привычного для нас набора осязаемых реквизитов. Нет возможности потрогать, визуально его ощутить. Помимо этого электронный документ не привязан к носителю. Он может существовать на многих носителях и являться одним и тем же документом.

1. отметьте все правильно записанные формулы. =2*a3*b2   =a1+сумм(b1: c3)   2. отметьте все правильные адреса ячеек и диапазонов электронной таблицы.   a5: b8 c7: b16 3. сколько ячеек входит в диапазон a7: b12? ответ:   12  4. в электронной таблице выделены 20 ячеек, расположенных в столбце h, начиная со строки 9. запишите адрес выделенного диапазона.   ответ: h9: h28 5. в электронной таблице выделен диапазон из 8 ячеек, расположенный в столбцах a и b. правый нижний угол диапазона находится в ячейке b8. запишите адрес диапазона.   ответ: a5: b8 6. в электронной таблице выделен диапазон из 9 ячеек, расположенный в столбцах c, d и e. правый нижний угол диапазона находится в ячейке e8. запишите адрес диапазона. ответ:   c6: e8 7. какую формулу нужно записать в ячейку b5, чтобы вычислить значение x по формуле, на рисунке? ответ:   8. запишите адрес выделенного диапазона. ответ:   9. запишите адрес выделенного диапазона. ответ:     10. замените формулу, используя один вызов функции сумм:=a3+a4+a5+b3+b4+b5 ответ:   =сумм(a3: b5) 11. замените формулу, используя два вызова функции сумм:=a3+a4+a5+b7+b8+b9+c7+c8+c9 ответ:   =сумм(a3: c9)