1. Выберите Оператора
2.Введите номер телефона
3. Проверьте и подтвердите номер телефона
4.Введите в окно "сумма оплаты"
5.Внесите купюры в купюроприёмник (возможно ввод нескольких купюр
6.Нажать кнопку "Оплатить"
7.Дождитесь распечатки чека
8.Перейдите в окно "Главное"
Подробнее - на Znanija.com - znanija.com/task/31888514#readmore
Читай по украинским буквам, начиная со второй через одну, т.е. в каждом слове бери буквы только на четных местах :))
ПТИЦЮ ПIЗНАТИ ПО ПIР'Ю, А ЛЮДИНУ ПО МОВI.
Unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; Edit2: TEdit; Label1: TLabel;
procedure Button1Click(Sender: TObject);
private { Private declarations }
public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
try
label1.Caption:=FloatToStr(StrToFloat(Edit1.Text)/StrToFloat(Edit2.Text));
except
On E : EZeroDivide do
ShowMessage('Деление на 0 запрещено : ');
end;
end;
end.<span>
</span>
#include <iostream>
using namespace std;
int main()
{
double sum = 0, mas[3][3];
for (int j = 0; j < 3; j++)
for (int jj = 0; jj < 3; jj++)
{
cin >> mas[j][jj];
if (j == jj)
sum += mas[j][jj];
};
cout<<"\n"<<sum;
}
