помогите написать на visual basic плиз - вопрос №767560
дано четырхзначное число. написать программу составляющую новое число. первая цифра которого — целая часть от деления первой цыфры на вторую. вторая — остаток от деления третьей цифры на четвёртую
program a1; var a,b,c,r:byte; l,k:word; begin read(l); a:=l mod 10; b:=l div 10 mod 10; c:= l div 100 mod 10; r:= l div 1000 mod 10; k:=c*1000+r*100+a*10+b; write(k); end.
Скорее всего так.
Добрый день. Меня заинтересовал ваш ответ "program a1;
var
a,b,c,r:byte; l,k:word;
begin
read(l);
a:=l mod 10;
b:=l div 10 mod 10;
c:= l..." на вопрос http://www.liveexpert.org/topic/view/767560-pomogite-napisat-na-visual-basic-pliz. Можно с вами обсудить этот ответ?
Добрый день. Меня заинтересовал ваш ответ "на VB.NETdumpz.org/680533/..." на вопрос http://www.liveexpert.org/topic/view/767560-pomogite-napisat-na-visual-basic-pliz. Можно с вами обсудить этот ответ?