kobzev-e
?>

Найди закономерность и продолжи последовательность, написав ещё четыре следующие буквы через запятую, через пробел (например ц, ч, щ, ъ) С, т, у, ф

Информатика

Ответы

татьяна1245
Int a[50],summa=0;                                                                                                   for(int i=0;i<50;i++)                                                                                                    { a[i]=rand();                                                                                                              if(a[i]==0)  summa++;                                                                                               cout<<"Количество равно "<<summa<<"\n";                
kchapurina591
1.
var 
  a, s, cifra: integer;
begin
  s:= 0;
  writeln('Введите натуральное число');
  readln(a);
  while a > 0 do
  begin
    cifra:= a mod 10;  //Определяем очередную цифру числа
    s:= s + cifra * cifra * cifra;  //Прибавляем к значению s цифру в кубе
    a:= a div 10;  //целочисленное деление числа на 10 (отсекаем текущую цифру)
  end;
  writeln('Сумма кубов цифр числа:  ', s);
end.
2.
var
  a: integer;
begin
  writeln('Введите натуральное число');
  readln(a);
  while a > 9 do  {Определяем первую цифру числа путем отрезания цифр числа, пока число не станет однозначным. Полученное число и будет первой цифрой}
    a:= a div 10;
  writeln('Первая цифра числа:  ', a);
end.
    

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Найди закономерность и продолжи последовательность, написав ещё четыре следующие буквы через запятую, через пробел (например ц, ч, щ, ъ) С, т, у, ф
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Rik200081490
Сергеевич1907
triumfmodern
AleksandrovnaIgor
Yelfimova-andrei
kalterbrun
aninepp
citioil15
Pona4ka93
Zhamynchiev
a580028r
kseybar
st-op767840
elena-ppk
Vs1377