Как воспользоваться режимом помощи?

Знания

Информатика

1 ответ:

Remark [10]4 года назад

0 0

F1 нажать
----------------

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

C клавиатуры вводится трехзначное число подсчитать произведение цифр ДЕСЯТКОВ и ЕДИНИЦPASCALABC

t--t

//PascalABC.NET
//Версия 3.3. сборка 1583 (25.11.2017)

var
a:integer;
begin
read(a);
writeln('Произведение десятков: ',(a mod 10)*(a div 10 mod 10)*(a div 100)*1000);
writeln('Произведение единиц: ',(a mod 10)*(a div 10 mod 10)*(a div 100));
readln;
readln;
end.

Пример:

123
Произведение десятков: 6000
Произведение единиц: 6

0 0

4 года назад

ОПИСАТЬ ПОСТАНОВКУ ЗАДАЧИ, КОНТРОЛЬНЫЙ ВОПРОС.... СРОЧНООООООООО!!!!!!

Marisha18

Если Rобщ<R1, то параллельное,
поскольку при последовательном Rобщ=R1+R2, R2= Rобщ-R1, т.е. должно быть Rобщ>R1

0 0

4 года назад

Назовите СКИ для каждого из этих исполнителей : Дворник, водитель, бухгалтер, приемная комиссия, ученик, преподователь

Vladislav Terentev [45]

уборка мусора во дворе; перевозка пассажиров; выдача заработной платы; прием экзаменов; сдача экзаменов; обучение детей в школе

Дворник
Водитель (трамвая например)
Бухгалтер
Экзаменатор
Студент/Ученик
Преподаватель

0 0

4 года назад

Чиновник, ежемесячно берёт взятки в размере Х рублей. Величина Х непостоянная и колеблется от 0 до 150000 рублей. X задаётся ген

denizche

//Pascal ABC.NET 3.1 сборка 1256

Var
x,s,i:integer;
begin
randomize;
s:=0;
i:=0;
while s<1700000 do
begin
inc(i);
x:=random(150001);
s:=s+x;
writeln('Месяц:',i,', своровал:',x,', сумма на текущий момент:',s);
end;
writeln('Res=',i);
end.

0 0

4 года назад

Срочно помогите!!!!!!!!!!!!!

dasha0707

Ответ:

Аппаратный интерфейс

0 0

4 года назад

Прочитать ещё 2 ответа