<em>// PascalABC.NET 3.3, сборка 1547 от 07.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var Гласные:=['а','е','ё','и','о','у','ы','э','ю','я'];
var s:=ReadlnString;
for var i:=s.Length downto 1 do
if LowCase(s[i]) in Гласные then Insert('c'+LowCase(s[i]),s,i+1);
Writeln(s)
end.
<u>Примеры</u>
Числитель
Чиcислиcитеcель
Анастасия, принеси бумагу и силикатный клей!
Аcанаcастаcасиcияcя, приcинеcесиcи буcумаcагуcу иcи сиcилиcикаcатныcый клеcей!
<span>M=25/5^2-1/(9 – 2^3)+7=25/25 -1/(9-8)+7=1-1+7=7
Ответ:7</span>
var a:array[1..10,1..10]of integer;
i,j,k,s:integer;
begin
for i:=1 to 10 do for j:=1 to 10 do a[i,j]:=random(9)+1;
for i:=1 to 10 do begin for j:=1 to 10 do write(a[i,j],' '); if j=10 then writeln; end;
s:=1;
for i:=2 to 10 do begin k:=a[i,1];
for j:=2 to 10 do begin
if i mod 2 = 0 then if a[i,j]>k then k:=a[i,j];
if (j=10) and (i mod 2=0) then s:=s*k;
end;
end;
Если ввести в окно поиска какое нибудь слово, то браузер найдет его значение или информацию о запросе
#include <iostream>
#include <cmath>
using namespace std;
bool is_in_square(double x, double y)
{
return ((fabs(x)<=1)&&(fabs(y)<=1));
}
int main()
{
double x, y;
cin >> x >> y;
if (is_in_square(x,y)) cout << "YES";
else cout << "No";
return 0;
}
Пример:
0.5 -0.6
YES