4 года назад

Составьте программу, которая запрашивает три числа и проверяет, делится их сумма на первое число без остатка.

1 ответ:

Lyyg [14]4 года назад

0 0

//Pascal ABC.NET v3.1 сборка 1219

Var
a,b,c:integer;
begin
read(a,b,c);
if (a+b+c) mod a=0 then writeln('Yes') else writeln('No');
end.

Читайте также

В каталоге находится 7 файлов: bark4.cpp bbo.pas boat4.p bb4.pt abc4.jpg b4r.pas boot.p Определите, по какой из пере

Андрей421

Просто разрешение файлов и всё...
.cpp
.pas
.pt
.jpg

0 0

4 года назад

#1 составьте программу,выводящую на экран все двухзначные числа,которые кратны произведению цифр,из которых состоит это число. #

фырфыр20

Program gt;
var i,j:integer;
begin
for i:=1 to 9 do
for j:=1 to 9 do
if((i*10+j)mod(i*j)=0)then writeln(i,j);
<span>end.
2)
program gt;
var a,b,c,k:integer;
begin
k:=0;
for a:=1 to 9 do
for b:=0 to 9 do
for c:=0 to 9 do
if(a=3*c)then k:=k+1;
writeln(k);
<span>end.</span></span>

0 0

4 года назад

ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ НА ЯЗЫКЕ С++ Уровень A. Заполнить массив случайными числами и выполнить циклический сдвиг элементов

Виолетта6568465

#include <iostream>
#include <cstdlib>
#include <ctime>
int main()
{
   using namespace std;
   cout << "Enter size of array: ";
   int N;
   cin >> N;
   int * ARR = new int[N];
   srand(time(0));
   int i;
   for (i = 0; i < N; ++i)
       ARR[i] = rand() % 100 + 1;

   cout << "Here is an original array:\n";
   for (i = 0; i < N; ++i)
       cout << ARR[i] << " ";
   cout << endl;

   int temp = ARR[N - 1];
   for (i = N - 1; i > 0; --i)
       ARR[i] = ARR[i - 1];
   ARR[0] = temp;

   cout << "\nHere is a new array:\n";
   for (i = 0; i < N; ++i)
       cout << ARR[i] << " ";
   cout << endl;

   return 0;
}

0 0

1 год назад

Выполните вычисления в двоичной системе счисления а)1011101+1111001 б)110111*1011 в)10100011\11

Каурка [19K]

А 2 122 102 б 111 322 221 в 918 182 с остатком

0 0

4 года назад

Пожалуйста, нужен небольшой доклад про компьютеры будущего. Заранее спасибо.

Юлия 922 [3]

Можешь еще в интернете поискать очень интересные сайты есть + картинки есть

0 0

4 года назад