Все категории

4 года назад

К наименьшему однозначному числу прибавить наименьшее трехзначное число, из полученной суммы вычтите наибольшее двузначное число

Знания

Информатика

1 ответ:

надежда764 года назад

0 0

0+111-99=12
Все, ответ готов

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

В первый день пловец проплыл 3 км. В каждый последующий день он проплывал на 0,5 больше, чем в предыдущий день. В какой по счёту

Екатерина2015

Program plov ;
var day : integer ;
var km , sum : real ;

begin
day := 1 ;
km := 3 ;
sum := km ;

while ( sum <= 30 ) do begin
day := day + 1 ;
km := km * 1.1 ;
sum := sum + km ;
end ;

writeln ( 'day=' , day ) ;
<span>end.</span>

0 0

4 года назад

Что не является операционой системойвиндоус б)андроид в)MySQL г)DOC

evgeniishumilov [14]

Ответ: в) <span>MySQL..................</span>

0 0

4 года назад

Коля:Двое юношей Петя и Витя играют в следующую игру. Петя говорит Вите три числа a, b и с. Витя, зная, что c=(a⋅x) mod b называ

вераверхорубова

#include <iostream>

using namespace std;

int main() {

int a, b, c;

cin >> a >> b >> c;

for(int i = 0; i <= 1000; i++){

if(a * i % b == c){

cout << i;

return 0;

}

cout << 0;

return 0;

}

<h3></h3><h3>Все прошло.</h3>

0 0

4 года назад

Ввести массивы Z [0..3] и A [0..3] . Для каждого Z[i] и A[i] вычислить функцию F=(Zi+Ai)^(3/2) . Найти сумму дробных положительн

Анастасия601

<span><span>program qwr;
uses crt; var f : real; i : byte; z,a : array [0..3] of real;
begin
  for i:=1 to 3 do
begin
write('z[ ',i,']= ');
  readln(z[i]);
end;
  for i:=1 to 3 do
  begin
write('a[ ',i,']= ');
readln(a[i]);
end;
  writeln(' ______________________');
  writeln(' Z[i] | A[i] | f ');
  for i:=1 to 3 do
  begin
f:=exp(ln(z[i]+a[i])*(3/2));
  writeln(' ',z[i]:(3),' | ',a[i]:(3),' | ',f:(3):(2));
end;
writeln(' _______|_______|______');
end.</span></span>

0 0

1 год назад

45 баллов! Напишите программу Запишите, используя функцию случайных чисел, заполнить числовой массив A, причем элементы массива

питима

===== PascalABC.NET =====

begin

var n := ReadInteger('n =');

var a := ArrRandom(n, 0, 100);

a.Println

end.

0 0

4 года назад