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

От острова Буяна до царства славного Салтана месяц (30 дней) пути. Капитан корабля записывает в вахтенный журнал количество миль, пройденных за день. Составьте блок-схему алгоритма для определения, в какую из трех десятидневок пройден больший путь. Напишите соответствующую программу на языке ПИТОН

Показать ответ
Ответ:
y4enik5
y4enik5
31.03.2021 02:51

#include <iostream>

#include <time.h>

using namespace std;

int main()

{

 setlocale(LC_ALL, "Russian");

 int a[5][5];

 int i, j, s, p;

 srand(time(NULL));

 for (i = 0; i <= 4; i++) {

   cout << "\n";

   for (j = 0; j <= 4; j++) {

     a[i][j] = ((double)rand() / (RAND_MAX + 1) * 5) + 1;

     cout << a[i][j] << ' ';

   }

 }

 s = 0;

 for (i = 0, j = 4; i < 5; i++, j--)  // правая диагональ

   s += a[i][j];

 p = 1;

 for (i = 0; i < 5; i++)        // левая диагональ

   p *= a[i][i];

 cout << "\n\nСумма правой диагонали = " << s << "\nПроизведение левой диагонали = " << p << "\n";

}

0,0(0 оценок)
Ответ:
vera186
vera186
23.05.2021 03:47

Ну если просто вопрос-ответ

var a: integer;

b: string;

begin

write('ваш возраст - ');

readln(a);

write('твоё самое любимое увлечение - ');

readln(b);

...

и так далее спрашиваешь командой "write('вопрос')", а для ответа команда "readln(d)", где d - это переменная, перед тем как её написать туда, надо её объявить после команды "var" через запятую. Если ответом будет текст, то писать перед "string", если натуральное число, то перед "integer", если целое число, то перед "real"

(например

var a, b, c: integer;

d, e, f: string;

g, h: real;)

...

end.

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