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

Проверьте,есть ли ошибки? : ) программирование. program name uses crt; var a : integer; begin clrscr; readln (a); if (a> =1703) or (a< 1914) or (a> =1992) then writeln ('санкт петербург'); if (a> =1915) or (a< 1924) then writeln ('петроград'); if (a> =1925) or (a< =1991) then writeln ('ленинград'); readln; end.

👇
Ответ:
nastyalomeyko
nastyalomeyko
24.03.2022
Во-первых, тут есть синтаксическая ошибка: в конце первой строки отсутствует точка с запятой. Во-вторых, неверно определены диапазоны дат: нет названия города до 1703 года (на самом деле города тогда еще не было, но что-то все равно надо сообщить), не определен 1914 год, когда город был переименован в Петроград и 1924 год, когда город был переименован в Ленинград. И в-третьих, хоть это и не ошибка, но недочет программы: будут выполняться все три оператора if, даже если в первом из них искомая дата будет найдена.

Ниже предлагается исправленный вариант программы.

program name;
uses crt;
var a:integer;
begin
  ClrScr;
  Readln(a);
  if a<1703 then Writeln('Город не существовал')
  else
    if (a>=1703) and (a<1914) or (a>=1991) then Writeln ('Санкт-Петербург')
    else
      if (a>=1914) and (a<1924) then Writeln ('Петроград')
      else Writeln ('Ленинград');
  ReadKey
end.
4,5(89 оценок)
Ответ:
nikzarubenko
nikzarubenko
24.03.2022
Program name;
uses crt;
var a :integer;
begin clrscr;
readln (a);
if (a>=1703) and (a<1914) or (a>=1992) then writeln ('Санкт Петербург');
if (a>=1915) and (a<1924) then writeln ('Петроград');
if (a>=1925)and (a<=1991) then writeln ('Ленинград');
if a<1703 then writeln('Error');
readkey;
end.
4,8(64 оценок)
Открыть все ответы
Ответ:
Rabika2018
Rabika2018
24.03.2022

#include <iostream>
using std::cout;
using std::endl;
#include <cstdlib>
using std::rand;
using std::srand;
#include <ctime>
using std::time;

int main()
{
    int a[12];

    for(int i = 0; i < 12; i++)
    {
        a[i] = rand() % 21;

        cout << a[i] << ' ';
    }
    cout << endl;

    int temp;
    for(int i = 0, j = 11; i < j; i++, j--)
    {
        temp = a[i];
        a[i] = a[j];
        a[j] = temp;
    }

    for(int i = 0; i < 12; i++)
    {
        cout << a[i] << ' ';
    }
    cout << endl;

   return 0;
}


Вмассиве из 12 целых положительных чисел от 0 до 20 поменять местами первый и последний элементы, вт
4,4(21 оценок)
Ответ:
AnToNoVa13
AnToNoVa13
24.03.2022

#include <iostream>
using std::cout;
using std::endl;
#include <cstdlib>
using std::rand;
using std::srand;
#include <ctime>
using std::time;

int main()
{
    int bc[30];
    int sumEven = 0, sumEvenIndex = 0;

    srand(time(0));

    for(int i = 0; i < 30; i++)
    {
        bc[i] = rand() % 51;

        if(bc[i] % 2 == 0)
        {
            sumEven += bc[i];
        }
        if(i % 2 == 0)
        {
            sumEvenIndex += bc[i];
        }

        cout << bc[i] << ' ';
    }
    cout << endl << endl;

    int temp, biggest;
    for(int i = 0; i < 30 - 1; i++)
    {
        biggest = i;

        for(int j = i + 1; j < 30; j++)
        {
            if(bc[biggest] < bc[j])
            {
                biggest = j;
            }
        }
        temp = bc[i];
        bc[i] = bc[biggest];
        bc[biggest] = temp;
    }

    for(int i = 0; i < 30; i++)
    {
        cout << bc[i] << ' ';
    }

    cout << "\nThe sum of elements with even indices = " << sumEvenIndex
        << "\nThe sum of even elements = " << sumEven << endl;

   return 0;
}


Сформируйте массив bc размерностью30 элементов случайным образом из диапазона 0 – 50.сформированный
4,8(55 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ