Задать вопрос!

Задать вопрос!

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

Эдвард Арутюнян

1 год назад

11

Ребят,помогите пожалуйста не могу понять как решать такие вот задачки по информатике

Ребят,помогите пожалуйста не могу понять как решать такие вот задачки по информатике

Информатика

1 ответ:

need2read1 год назад

0 0

Держи!
Надеюсь, доходчиво разъяснил)

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

Изначально, задача была такая: На вход программы подается натуральное число. Требуется написать программу, которая определяет со

Светлана Ломакина [7]

Program sg3;
uses crt;
var i,a,k, sum: integer;
begin
clrscr;
write('Введите число: ');
readln(a);
k:=0;
for i:=2 to a div 2 do
if a mod i =0 then
k:=k+1;
if k=0 then
write('Простое')
else
writeln('Составное');
while (a<>0) do
begin
sum:=sum+(a mod 10);
a:=a div 10;
end;
write('Сумма цифр= ',sum);
<span>end.</span>

0 0

4 года назад

Известно сопротивление каждого из элементов электрической цепи. Все элементы соединены параллельно. Определить общее сопротивлен

Алена2710 [350]

var cond,res:real;

begin

cond:=0;

readln(res);

while (res>0) do

begin

cond:=cond + 1/res;

readln(res);

end;

writeln(1/cond)

end.

(Считаю, что с клавиатуры вводятся сопротивления, признак конца ввода - 0)

0 0

4 года назад

Номер 5 срочно плизззззззз

3343434 [60]

Свисток Начало/Конец игры
Жесты Повороты налево, направо, вперед назад
Табло времени Начало/Конец чего-либо
Школьный звонок Начало урока или конец

0 0

4 года назад

A*B+C*D=1 Сколько различных решений имеет уравнение ?

Ольга Сомова [253]

A*b+c*d=1
a*b c*d
0 + 1 3реш
1 + 0 3реш (слагаемые просто поменяются)
1 + 1. 1реш
a*b=0 c*d=1
a b c d
0 0 1 1
1 0
0 1

a*b=1 c*d=1
a b c d
1 1 1 1
ответ:7реш.

0 0

4 года назад

В массиве хранится информация о среднедневной температуре за каждый день июля. Определить количество самых прохладных дней в это

Илона Ласк [1]

var

a:array[1..31] of real;

i,k:integer;

min:real;

begin

min:=50;

for i:=1 to 31 do

begin

readln(a[i]);

if a[i]<min then min:=a[i];

end;

k:=0;

for i:=1 to 31 do

if a[i]=min then k:=k+1;

writeln(k);

end.

0 0

4 года назад