#include<stdio.h>
void main()
{
float coast, result;
int beginm, endm;
printf("Задайте показания счетчика на начало месяца ");
scanf("%d", &beginm);
printf("\nЗадайте показания счетчика на конец месяца ");
scanf("%d", &endm);
printf("\n Задайте стоимость 1 кВт ч ");
scanf("%f", &coast);
result=(endm-beginm)*coast;
printf("\n\n Месячная оплата за электроэнергию составит: .2%f\n", result);
}
1)
var
a, b, c, d: integer;
begin
readln(a);
b := a div 100; { сотни }
c := (a mod 100) div 10; { десятки }
d := a mod 10; { единицы }
writeln('Сумма цифр равна: ', b + c + d);
end.
2)
var
a, b, c, d, p: integer;
begin
readln(a);
b := a div 100; { сотни }
c := (a mod 100) div 10; { десятки }
d := a mod 10; { единицы }
p := d * 100 + c * 10 + b;
writeln('Наоборот: ', p);
end.
3)
var
a, b, c, d, e: integer;
begin
readln(a);
e := a div 1000; { тысячи }
b := (a div 100) mod 10; { сотни }
c := (a mod 100) div 10; { десятки }
d := a mod 10; { единицы }
writeln('Сумма: ', e + b + c + d);
writeln('Произведение: ', e * b * c * d);
end.
для того, чтобы сохранить 1000 цифр, надо 
⇒ i = 10 бит
тогда для записи идентификатора требуется 4*10+12 = 52 бит ≈ 7 байт
для 20 команд 7*20 = 140 байт
<em>// PascalABC.NET 3.2, сборка 1344 от 22.11.2016</em>
function CM(a:array of integer):real;
// среднее геометрическое элементов с четным значением, большим 10
begin
Result:=1;
var k:=0;
foreach var x in a do
if x.IsEven and (x>10) then begin Result*=x; k+=1 end;
if k>0 then Result:=Power(Result,1/k) else Result:=1
end;
begin
var C:=ArrRandom(10,1,30); C.Println;
Writeln(CM(C));
var M:=ArrRandom(10,1,30); M.Println;
Writeln(CM(M));
end.
Пример
13 26 18 28 8 30 15 29 21 5
25.039824738313
20 1 1 28 28 29 3 20 3 15
23.6643191323985
1)
<span>#include<iostream>
#include<cmath>
void main()
{
char ch1, ch2;
int vol1, vol2;
std::cin >> ch1 >> vol1;
std::cin >> ch2 >> vol2;
if ((((abs(ch1 - ch2) <= 2) && (abs(vol1 - vol2) <= 2)) && ((ch1 != ch2) && (vol1 != vol2))) && !((abs(ch1 - ch2)==1) && (abs(vol1-vol2))==1))
std::cout << "Possible";
else
std::cout << "Impossible";
<span>}
3)
</span></span>#include<iostream>
using namespace std;
void main() {
<span>int n,m;
cin >> n,m;
cout<<n;
for(int i=n;i<=m;i++)
cout<<i+2;
}
4)
</span>#include <iostream>
<span>using namespace std;</span> void<span> main()</span>{<span>
int mass[2][4] //размерность своего массива вписывай.
</span><span> {</span><span>
{ 1, 2, 3, 4 }, //вписывай свои числа.
</span><span> { 1, 2, 3, 4 } </span><span>
}<span>;
</span></span>
for (int i=0 ; i<2;++i)
{
for (int j=0 ; j<4;++j)
{
if(mass[i][j]<0)
cout<<mass[i][j];
}
}
system("pause");
}
