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

Хотя бы некоторые из них. буду : 1. написать на паскале программу для вычисления суммы всех натуральных чисел в интервале от 100 до 200 2. написать на паскале программу для вычисления суммы: s=2+4+6+8++2*n, где n вводиться с клавиатуры 3. что будет выведено на экран в результате след. программы, если n было присвоено значение 4. program prim; var n,s,i enteger; begin read(n); s: =0; for i: =1 to n do s: =s+2*i; write(s) end 5. какие из слов могут быть идентификаторами в паскале (может быть неск. ответов): 123prim, бак_12, slon_1, begin 6. написать на паскале программу для вычисления из трёх заданных целых чисел. 7. что будет выведено на экран после выполнения след. программы: program my; var a,b,c: integer; begin; a: =5; b: =a+10; if a+b> 20 then c: 1 else if b=15 then c: =2 else c: =3; write(c) end. мне хотя бы некоторые из вышеперечисленных. буду признателен вам. заранее .

👇
Ответ:
nastya788rf
nastya788rf
12.07.2021
1) 
sum = 0;
for i:= 100 to 200 do sum:=sum+i;

2)
readln (N);
sum:=0;
for i:=1 to N do sum:=sum+i*2;

3)
20

5)
slon_1

6)
вычисления чего?

7)
2
4,5(64 оценок)
Открыть все ответы
Ответ:
yarikser4
yarikser4
12.07.2021
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходный массив ***');
  var f:=MatrRandom(2,3,-99,99);
  f.Println(8); Writeln(8*f.ColCount*'-');
  var s:=f.Row(1).Sum;
  Writeln('Сумма по 2й строке равна ',s);
  Writeln('*** Полученный массив ***');
  f.SetCol(2,f.Col(2).Select(t->t*s).ToArray);
  f.Println(8)
end.

Пример
*** Исходный массив ***
     -74     -10      38
     -89      91     -18

Сумма по 2й строке равна -16
*** Полученный массив ***
     -74     -10    -608
     -89      91     288
4,8(87 оценок)
Ответ:
Вольха97
Вольха97
12.07.2021
#include <iostream>
using namespace std;

int main() {
    const int n=5;
    int p[n][n];
    srand(time(NULL));
    cout << "Матрица:\n";
    for(int i = 0; i < n; i++){
    for(int j = 0; j < n; j++){
    p[i][j]=rand() % 50;
    cout << p[i][j] << " ";
    }
    cout << "\n";
    }
    int max = p[2][0], jmax=0;
    for(int j = 1;  j<n; j++)
        if (p[2][j]>max) {
        max = p[2][j]; jmax = j;
        }
    cout << "max = p[3,"<<jmax+1<<"] = "<<p[2][jmax]<<"\n";
}

Пример:
Матрица:
33 28 18 49 22
9 43 6 18 37
2 25 8 36 21
29 6 1 35 5
46 23 42 27 46
max = p[3,4] = 36
4,4(25 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ