//TDM-GCC 4.9.2
#include <iostream>
#include <cstdlib>
#include <locale>
#include "string.h"
int main(int argc, char *argv[])
{
system("chcp 1251 >nul");
setlocale(LC_ALL, "Russian");
unsigned char word[] = {"БАЙТ"};
int size = sizeof(word) / sizeof(word[0]);
int sum = 0;
for(int i = 0; i < size-1; i++)
{
printf("\"%c\" = %d\n", word[i], word[i]);
sum += word[i];
if(i+1 == size-1) printf("Сумма кодов букв слова \"БАЙТ\" = %d", sum);
}
return EXIT_SUCCESS;
}
1). По назначению (гражданскому или военному): грузовые, легковые, повышенной проходимости, автобусы, спортивные, бронированные, амфибии, самосвалы и т.п.
2). По типу двигателя: бензиновые, газовые, газогенераторные, дизельные, водородные, электромобили.
3). По конструкции: праворульные и леворульные, с ручной или автоматической коробкой передач.
4) По типу кузова: седан, универсал, хэтчбэк, купе, лимузин и т.д.
Все перечисленные множества являются подмножествами множества автомобилей.
Var i : integer; p:int64;
begin
p:=1;
for i:=1 to 17 do p:=p*i;
writeln(p);
<span>end.</span>
Var
i,k,s:integer;
begin
k:=0; s:=0;
i:=7;
Writeln('Числа на интервале [7;100], кратные 7:');
while i<=100 do begin
Write(i,' ');
s:=s+i; Inc(k);
i:=i+7
end;
Writeln;
Writeln('Сумма этих чисел равна ',s,', количество равно ',k);
end.
Результат выполнения программы
Числа на интервале [7;100], кратные 7:
7 14 21 28 35 42 49 56 63 70 77 84 91 98
Сумма этих чисел равна 735, количество равно 14