М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
gothalk2014
gothalk2014
08.08.2020 20:41 •  Информатика

УМОЛЯЮ! Обери із запропонованого, що належить до інформаційних процесів (декілька варіантів відповіді) *

передавання
викладення
зберігання
пошук
демонстрація
опрацювання

👇
Ответ:
leramakarova2001
leramakarova2001
08.08.2020

Объяснение:

зберігання, передавання, пошук, опрацьовування

4,4(69 оценок)
Открыть все ответы
Ответ:
Dashasvi
Dashasvi
08.08.2020
Var
  n, m, p, k, sum, x: integer;
  s: string;
  c, i: byte;

begin
  write('Число: ');
  read(n);
  m := n;
  k := 0;
  while m <> 0 do
  begin
    p := m mod 10;
    K := K + 1;
    m := m div 10;
  end;
 
  Str(N, s);
  c := 0;
  for i := 1 to Length(s) do
    if s[i] in ['0', '2', '4', '6', '8'] then
      Inc(c);
 
  x := n;
  sum := 0;
  while (x <> 0 ) do
  begin
    sum := sum + (x mod 10);
    x := x div 10;
  end;
 
  writeln('Количество чисел: ', k);
  writeln('Количество четных чисел: ', c);
  writeln('Cумма чисел : ', sum);
end.
4,8(33 оценок)
Ответ:
uchenik1988
uchenik1988
08.08.2020
1)
program discuc;
uses crt;
var x,y,z,c,d,r,q,w:real;
begin
writeln ('введите x');
readln (x);
writeln ('введите y');
readln (y);
writeln ('введите z');
readln (z);
writeln ('введите c');
readln (c);
q:=sin(sqr(x));
d:=cos(x)/cos(exp(ln(x)*3));
w:=z/y*c;
r:=q+d+w;
writeln ('r=',r:5:2);
readkey;
end.
2)
program bibup;
uses crt;
var x,y,z,c,v,j:real;
begin
writeln ('введите x');
readln (x);
writeln ('введите y');
readln (y);
z:=(1/(sqr(x)))+1;
c:=sqrt(5);
v:=6.7*(sqr(y));
j:=z-c+v;
writeln ('j=',j:5:2);
readkey;
end.
Это если в Pascal Free
надеюсь это то
4,5(87 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ