// создаёт текстовый файл там, где лежит программа
//////////////////////////////////////////////
var x: text;
begin
assign (x, 'file.txt');
rewrite (x);
writeln(x,'Тут напиши что-нибудь, что нужно записать в файл');
close(x);
<span>end.</span>
Клавиша на клавиатуре TAB.
#include <iostream>
int main()
{
int
days,
sale;
float sum = 0.0f;
std::cout << "Введите количество дней, скидку, сумму(в долларах): ";
std::cin >> days >> sale >> sum;
sale /= 100;
for(int i = 0; i < days; i++)
{
sum += 3; // прибавляем 3$
sum += sum * sale; //прибавляем процент от суммы
}
std::cout << "Итоговая прибыль равна = " << sum << std::endl;
}
#include <iostream>
#include <sstream>
using namespace std;
int ispal(int x)
{
stringstream a;
a<<x;
string s =a.str();
string t="";
for(int i=s.length()-1;i>=0;i--)
t+=s[i];
for(int i=0;i<s.length();i++)
if(s[i]!=t[i])
return 0;
return 1;
}
int main()
{
int n;
cin>>n;
while(!ispal(n))
n++;
cout<<n;
return 0;
}
Var x,y,a,b:integer;
begin
write('x, y:');
readln(x,y);
if (x>0)and(y>0) then
begin
a:=x; b:=y;
while a<>b do
if a>b then a:=a-b else b:=b-a;
writeln('НОД(',x,',',y,') = ',a);
end
else writeln('Ошибка ввода');
end.
Пример:
<span>x, y:
50 125
НОД(50,125) = 25</span>