Program pokypka;
var s,os,v1,v2,v3:integer;
begin
writeln('Введите имеющуюся сумму');
readln(s);
writeln('Введите цену первой вещи');
readln(v1);
writeln('Введите цену второй вещи ');
readln(v2);
writeln('Введите цену третьей вещи');
readln(v3);
os:=s-v1-v2-v3;
writeln('Остаток денег=',os)
end.
Число в 2 сс - 1000001
1000001(2)=2^6+2^0=65(10)
Ответ: 65
1. Отметим, что оба получающихся числа независимы друг от друга, поскольку первое строится из нечетных цифр исходного пятизначного числа, а правое - из четных.
2. Первое число - сумма трех цифр, следовательно его величина может быть в пределах от 0+0+0=0 до 9+9+9=27. Второе число - сумма двух цифр, поэтому его величина может быть в пределах от 0+0=0 до 9+9=18. На этом основании бракуем все числа, у которых вторая цифра больше 27 и/или первая цифра больше 18.
Таким образом вычеркиваем 1030, 2019, 1920, 3010.
3. 40 - не подходит (4,0), нарушен порядок неубывания, 130 - не подходит (13,0), 1320 - (13,20) - подходит, нарушен порядок неубывания, 2013 - не подходит (20,13), нарушен порядок неубывания, 213 - подходит (2,13).
Ответ: 2 числа.
Следуя алгоритму, можно понять, что каждый "виток спирали" будет закончен цифрой, на 1 большей, чем цифра, с которой он начинался. Значит, можно заметить, что по диагонали, проходящей через центральную клетку таблицы, из правого верхнего угла в левый нижний, будут только числа 11. Значит и закончится спираль числом 11.
1) на Pascal:
var
t,i,j:integer;
a:array[1..4]of integer;
begin
for i:=1 to 4 do
begin
write('Vvedite ',i,'-i 4islo: ');
readln(a<span>);
end;
for i:=2 to 4 do
for j:=4 downto i do
if a[j-1]>a[j] then
begin
t:=a[j-1];
a[j-1]:=a[j];
a[j]:=t;
end;
writeln('Raspolagaem 4isla v poryadke vozrastaniya:');
for i:=1 to 4 do
writeln(a<span>);
readln;
end.
2) на С:
#include <stdio.h>
#include <conio.h>
void main(void){
int n,a,b,c,d;
printf("\nVvedite 4x-znachnoe chislo n: ");
scanf("%i", &n);
a=n/1000;
b=(n-a*1000)/100;
c=(n-a*1000-b*100)/10;
d=n-a*1000-b*100-c*10;
if (a+b==c+d) printf("true");
else printf("false");
getch(); </span></span>