В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
GeorgeFedorenko
GeorgeFedorenko
15.06.2021 16:35 •  Информатика

A) Построить алгоритм вычисления s = a / b и p = a * b для ЭВМ и блок схему для данного алгоритма. Выполнить трассировку этого алгоритма для любых значений.
b) Построить алгоритм вычисления объема куба (v = a*a*a) и площади боковой поверхности
куба (s = 6*a*a), если задана сторона куба (a). Построить блок схему для данного
алгоритма. Выполнить трассировку этого алгоритма для любых значений.
c) Записать алгоритм вычисления площади круга (s = πr
2
) и длины окружности (l = 2πr) и
построить блок схему для данного алгоритма. Выполнить трассировку этого алгоритма
для любых значений.

У МЕНЯ ВОЕМЕНИ КАК КОТ НАПЛАКАЛ

Показать ответ
Ответ:
nikitaoksin201
nikitaoksin201
16.11.2020 20:35
1)
#include <iostream>

using namespace std;

int main() {
  int s = 0;
  for(int i = 1; i < 101; cout << i << ' ', s+=i, i+=2);
  cout << endl << s << endl;
}
2)
#include <iostream>

using namespace std;

int main() {
  int n, k = 0;
  cin >> n;
  for(int i = 0; i < n; i++) {
    int number;
    cin >> number;
    if(number % 2 == 0) k++;
    else k--;
  }
  if(k > 0) cout << "Четных" << endl;
  else if (k < 0) cout << "Нечетных" << endl;
  else cout << "Одинаково" << endl;
}
3)

#include <iostream>

using namespace std;

int main() {
 for(int i = 20; i < 51; i++)
   if(i % 3 == 0 && i % 5 != 0) cout << i << endl;
}
4) 
#include <iostream>

using namespace std;

int main() {
 for(int i = 35; i < 88; i++)
   if(i % 7 == 1 || i & 7 == 2 || i % 7 == 5) cout << i << endl;
}
0,0(0 оценок)
Ответ:
sasha235sasha
sasha235sasha
30.09.2022 23:00

const g = 5; v = 3;

var a: array[1..g,1..v] of integer;

i,j,maxj,minj,p:integer;

begin

writeln('Массив: ');

for i:=1 to g do

begin

for j:=1 to v do

begin

a[i,j]:=Random(101);

write(a[i,j]:4)

end;

writeln

end;

for i:=1 to g do

begin

maxj:=1;

minj:=1;

for j:=1 to v do

begin

if a[i,j]>a[i,maxj] then maxj:=j;

if a[i,j]<a[i,minj]then minj:=j;

end;

p:=a[i,maxj];

a[i,maxj]:=a[i,minj];

a[i,minj]:=p;

end;

writeln;

writeln('Преобразованный массив: ');

for i:=1 to g do

begin

for j:=1 to v do write(a[i,j]:4);

writeln

end;

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота