Р. А. Юсупов, С. Н. Искандарова, Ш. Мирзанова C/C++ тилида топшириқ ва масалалар Самарқанд – 2013 йил


Download 1.35 Mb.
bet75/105
Sana13.04.2023
Hajmi1.35 Mb.
#1353566
TuriУчебник
1   ...   71   72   73   74   75   76   77   78   ...   105
Bog'liq
CPP masalalari1


Часть II. Решения 159
fl tl II
и п _«„^11
и П_„ II
II II II
II II II
II II _||
II II _ II
» _"
'_ — "
1 II
•_ "
|__ _ II
|_ ^11
1 II
II II
II _ II
II __ II
• • /
II __ II
II II
f
М_ II
|1_ _ II/
// Д,Е,Ж,3
// И,Й,К,Л
// м,н,о,п
// Р,С,Т,У
// Ф,Х,Ц,Ч
// ш,щ,ъ,ы
// ь,э,ю,я
};
lansigned char mes[80]; // сообщение
char sim[4]; // символ в кодировке Морзе -
// последовательность точек и тире
char znak; // "передаваемый" знак - тире или точка
int i,j; // номер символа и знака
puts("\n*** Телеграф ***");
puts("Введите сообщение, которое надо передать");
puts("(используйте только заглавные русские буквы)");
printf("->");
gets(mes);
for (i = 0; i < strlen(mes); i++)
{
if (mes[i] >= 'A* &&mes[i] <='ЯМ
{
// опр>еделим код очередной буквы (ф-я Ord) сообщения
//и получим из таблицы кодировки соответствующий
// элемент массива - последовательность точек и тире
strcpy(Sim, morse[mes[i]-128]);
j = 0;
do
if (sim[j] == '-' 11 sim[j] == '.')
{
putch(sim[j++]);
sound(1000);
if (sim[j] == '.M
delay(LI);
else delay(L2);
nosound;
delay(L3);
}
160 C/C++ в задачах и примерах
while ( sim[j] !=»'&& j <4 ) ;
delay(L4); // пауза между буквами
}
else
if (mes[i] == ' ») // пробел между словами
{
printf(" "); // пробел между словами сообщения
delay(L5);
}
}
puts("ХпСообщение передано!");
puts("Для завершения работы нажмите ");
getch();
}
Задача 185
#include
#include
#include // для доступа к M_PI
// объем цилиндра
float veil(float h, float r)
{
return(M_PI*r*r*h);
}
void mainO
{
float r,h; // высота и радиус основания цилиндра
float v; // объем цилиндра
puts("Вычисление объема цилиндра");
printf("Введите высоту и радиус основания ->");
scanf("%f%f", &h, &r)/
V = veil (h, r) ;
printf("Объем цилиндра %3.2f\n", v);
printf("Для завершения нажмите ");
getch();
}

Download 1.35 Mb.

Do'stlaringiz bilan baham:
1   ...   71   72   73   74   75   76   77   78   ...   105




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling