Ketti08
26.01.2020 18:37

Написати программу для розрахунку суми всіх чисел що знаходяться в діапазоні від А до В і є кратними числу 3. В ЛАЗАРУС

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
арсений213
07.01.2020 09:38

язык с++

Объяснение:

#include <iostream>

using namespace std;

int main() {

setlocale(LC_ALL, "ru");

int number[15] = {4,6,8,10,12,14,16,18,20,22,24,26,28,30,32 };

cin >> number[0];

 printf("%d\n", number[0]);

 printf("%d\n", number[1]);

 printf("%d\n", number[2]);

 printf("%d\n", number[3]);

 printf("%d\n", number[4]);

 printf("%d\n", number[5]);

 printf("%d\n", number[6]);

 printf("%d\n", number[7]);

 printf("%d\n", number[8]);

 printf("%d\n", number[9]);

 printf("%d\n", number[10]);

 printf("%d\n", number[11]);

 printf("%d\n", number[12]);

 printf("%d\n", number[13]);

 printf("%d\n", number[14]);

 

 

 system("pause");

}

0,0(0 оценок)
Ответ:
dikushant
03.02.2020 19:24
// PascalABC.NET 3.0, сборка 1076
const
  n=20; { количество дат }
type
  TDate=record
    d:1..31;
    m:1..12;
    y:word
  end;
var
  dates:array[1..n] of TDate;
  i:byte;
  s,st:string;
 
begin
  Randomize;
  for i:=1 to n do begin
    s:='';
    With dates[i] do begin
      d:=Random(27)+1;
      Str(d,st);
      if Length(st)=1 then st:='0'+st;
      s:=s+st+'.';
      m:=Random(12)+1;
      Str(m,st);
      if Length(st)=1 then st:='0'+st;
      s:=s+st+'.';
      y:=Random(51)+1960;
      Str(y,st);
      s:=s+st;
      if m in [3..5] then s:=s+' - весенняя';
      Writeln(s)
    end
  end
end.

Тестовое решение:
22.12.1979
21.10.1975
25.03.1980 - весенняя
23.04.1967 - весенняя
09.10.1967
16.05.1965 - весенняя
09.08.1996
05.10.2001
10.11.1985
18.08.1970
08.10.1983
01.12.2005
01.01.1994
09.11.1962
14.09.1979
24.03.2008 - весенняя
14.01.2003
22.04.1990 - весенняя
18.08.1969
16.05.2009 - весенняя
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота