Клавиши CTRL + PAGE UP перемещается к предыдущему размещению редактирования.Сочетание клавиш CTRL + PAGE DOWN перемещает к следующему изменению расположения.

0 0

4 года назад

Задание на циклический алгоритмДаны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числа

gertsogLK [7]

Решение во вложении.

0 0

4 года назад

ПОМОГИТЕ, ПРОШУ!!!!!!!!!! НАПИСАТЬ ПРОГРАММУ С++ "Дано трех значное число, необходимо найти старшую цифру и вывести на экран над

Александр Е

#include <iostream>
using namespace std;
int main()
{
int n,m,p;
cin>>n;
int n1=n/100;
int n2=(n/10)%10;
int n3=n%10;
if (n1>n2)
if (n1>n3) {m=n1; p=1;} else {m=n3; p=3;}
else
if (n2>n3) {m=n2; p=2;} else {m=n3; p=3;}
cout<<"max="<<m<<", poz= "<<p<<endl;
system("pause");
}

0 0

4 года назад

Составить программу, по которой выводится таблица кодировки с русскими буквами и кодами. В программе Паскаль. Помогите, пожалуйс

Тинка2345

Var
i,n:integer;
s:string;
a:array[1..32,1..2] of string;
begin
n:=1;
for i:=Ord('А') to Ord('Я') do
begin
    Str(i,s);
    a[n,1]:=Chr(i)+' - '+s;
    Inc(n);
end;
n:=1;
for i:=Ord('а') to Ord('я') do
begin
    Str(i,s);
    a[n,2]:=Chr(i)+' - '+s;
    Inc(n);
end;
for i:=1 to 32 do writeln(a[i,1],'   ',a[i,2])
end.

<em><u>Результат выполнения программы в среде PascalABC.Net</u></em>
А - 192   а - 224
Б - 193   б - 225
В - 194   в - 226
Г - 195   г - 227
Д - 196   д - 228
Е - 197   е - 229
Ж - 198   ж - 230
З - 199   з - 231
И - 200   и - 232
Й - 201   й - 233
К - 202   к - 234
Л - 203   л - 235
М - 204   м - 236
Н - 205   н - 237
О - 206   о - 238
П - 207   п - 239
Р - 208   р - 240
С - 209   с - 241
Т - 210   т - 242
У - 211   у - 243
Ф - 212   ф - 244
Х - 213   х - 245
Ц - 214   ц - 246
Ч - 215   ч - 247
Ш - 216   ш - 248
Щ - 217   щ - 249
Ъ - 218   ъ - 250
Ы - 219   ы - 251
Ь - 220   ь - 252
Э - 221   э - 253
Ю - 222   ю - 254
Я - 223   я - 255

0 0

3 года назад