program raf105;
var
s: string;
i1,i2,i3,i4,i5,o,x: integer;
domok_komod: boolean;
begin
s:= '';
for i1:=1 to 4 do
for i2:=1 to 4 do
for i3:=1 to 4 do
for i4:=1 to 4 do
for i5:=1 to 4 do
case i1 of
1: s[1]:= 'Д';
2: s[1]:= 'К';
3: s[1]:= 'М';
4: s[1]:= 'О';
end;
case i2 of
1: s[2]:= 'Д';
2: s[2]:= 'К';
3: s[2]:= 'М';
4: s[2]:= 'О';
case i3 of
1: s[3]:= 'Д';
2: s[3]:= 'К';
3: s[3]:= 'М';
4: s[3]:= 'О';
case i4 of
1: s[4]:= 'Д';
2: s[4]:= 'К';
3: s[4]:= 'М';
4: s[4]:= 'О';
case i5 of
1: s[5]:= 'Д';
2: s[5]:= 'К';
3: s[5]:= 'М';
4: s[5]:= 'О';
if s = 'ДОМОК'
then domok_komod:= true;
if s = 'КОМОК' //Это не опечатка. Так и должно быть
then domok_komod:= false;
if domok_komod
then o+= 1;
x+=1;
writeln('Слов между ДОМОК и КОМОД (включительно): ',o);
writeln('Всего возможных комбинаций: ',x);
end.
#include <iostream>
using namespace std;
int main() {
setlocale(LC_ALL, "ru");
int a, b;
cout << "Введите 2 числа: ";
cin >> a;
cin >> b;
cout << "a + b = " << a+b << endl << "a - b = " << a-b << endl << "a * b = " << a*b << endl << "a / b = " << a/b << endl
<< "a % b = " << a%b << endl << "float(a/b) = " << float(a/b) << endl;
system("pause");
return 0;
}
program raf105;
var
s: string;
i1,i2,i3,i4,i5,o,x: integer;
domok_komod: boolean;
begin
s:= '';
for i1:=1 to 4 do
for i2:=1 to 4 do
for i3:=1 to 4 do
for i4:=1 to 4 do
for i5:=1 to 4 do
begin
case i1 of
1: s[1]:= 'Д';
2: s[1]:= 'К';
3: s[1]:= 'М';
4: s[1]:= 'О';
end;
case i2 of
1: s[2]:= 'Д';
2: s[2]:= 'К';
3: s[2]:= 'М';
4: s[2]:= 'О';
end;
case i3 of
1: s[3]:= 'Д';
2: s[3]:= 'К';
3: s[3]:= 'М';
4: s[3]:= 'О';
end;
case i4 of
1: s[4]:= 'Д';
2: s[4]:= 'К';
3: s[4]:= 'М';
4: s[4]:= 'О';
end;
case i5 of
1: s[5]:= 'Д';
2: s[5]:= 'К';
3: s[5]:= 'М';
4: s[5]:= 'О';
end;
if s = 'ДОМОК'
then domok_komod:= true;
if s = 'КОМОК' //Это не опечатка. Так и должно быть
then domok_komod:= false;
if domok_komod
then o+= 1;
x+=1;
end;
writeln('Слов между ДОМОК и КОМОД (включительно): ',o);
writeln('Всего возможных комбинаций: ',x);
end.
Язык PascalABC#include <iostream>
using namespace std;
int main() {
setlocale(LC_ALL, "ru");
int a, b;
cout << "Введите 2 числа: ";
cin >> a;
cin >> b;
cout << "a + b = " << a+b << endl << "a - b = " << a-b << endl << "a * b = " << a*b << endl << "a / b = " << a/b << endl
<< "a % b = " << a%b << endl << "float(a/b) = " << float(a/b) << endl;
system("pause");
return 0;
}