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

Если переменная b= 3,7 , то мы должны ее описать... var b: char;

var b: boolean;

var b: real;

var b: integer;

👇
Ответ:
yaksyta
yaksyta
26.01.2022

Если не ошибаюсь, то нецелые числа в паскале это вещественный тип, т.е.

var

b: real;

begin

b = 3,7;

end.

Объяснение:

4,4(70 оценок)
Открыть все ответы
Ответ:
rustikkhusnutdi
rustikkhusnutdi
26.01.2022
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=readInteger('Элементов в массиве:');
  var a:=ArrGen(n,i->3-i*2+i,1);
  a.Println; Writeln; a.PrintLines;
  Writeln('Некратных семи: ',a.Where(t->t mod 7 <> 0).Count);
  Writeln('Отрицательных: ',a.Where(t->t<0).Count);  
  a:=a[:2]+a[3:5]+Arr(99)+a[5:]; a.Println;
end.

Пример
Элементов в массиве: 7
2 1 0 -1 -2 -3 -4

2
1
0
-1
-2
-3
-4
Некратных семи: 6
Отрицательных: 4
2 1 -1 -2 99 -3 -4
4,5(39 оценок)
Ответ:
atalalihin
atalalihin
26.01.2022
Начнем с того, что исправим текущий код. У вас используется цикл, но он совершенно здесь не нужен.
Вот программа без цикла. 

#include "stdafx.h"

#include <iostream>

using namespace std;

int main()

{

int d, m, y, i;

int max[12] = { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };

setlocale(0, "");

cout << "Введите день(число)";

cin >> d;

cout << "Введите месяц(число)";

cin >> m;

cout << "Введите год(число)";

cin >> y;

if ( (y % 4 == 0 && y % 100 != 0) || y % 400 == 0) //Проверка что год високосный

max[1]++;

if( d == max[m-1])

{

d = 1;

m++;

}

else

    d++;


if (m == 13)

{

m = 1;

y++;

}

cout << d << " " << m << " " << y;


cin >> d;//Ожидание ввода, чтобы посмотреть результаты пработы программы

return 0;

}


Эта программа определяет следующий день от текущего.


А вот программа, которая определяет предыдущий день.

#include "stdafx.h"

#include <iostream>

using namespace std;

int main()

{

int d, m, y, i;

int max[12] = { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };

setlocale(0, "");

cout << "Введите день(число)";

cin >> d;

cout << "Введите месяц(число)";

cin >> m;

cout << "Введите год(число)";

cin >> y;

if ( (y % 4 == 0 && y % 100 != 0) || y % 400 == 0) //Проверка что год високосный

max[1]++;

if( d == 1)

{

if (m == 1)

{

m = 12;

y--;

}

else

m--;


d = max[m - 1];

}

else

    d--;


cout << d << " " << m << " " << y;


cin >> d;//Ожидание ввода, чтобы посмотреть результаты пработы программы

return 0;

}




4,4(51 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ