1. Информатика
  2. Паскаль абс найти количество

Паскаль абс найти количество 3-х значных чисел, сумма цифр которых=15

gamegame2006 gamegame2006    3   17.06.2019 03:10    0

Ответы
СуперТрололо СуперТрололо  02.10.2020 03:07
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(+b+c=15)then k:=k+1;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
2002anna2 2002anna2  24.06.2019 15:40
Документ может существовать в виде и в документа. в памяти компьютера хранится документ, а на - твёрдая копия документа !...
Вичка11111111 Вичка11111111  08.08.2019 12:20
Составьте программу из 15 элементов в промежутке от [-7,24] integer...
Zaika20051 Zaika20051  16.10.2020 12:47
1.Что такое программа? 2.Что такое программное обеспечение? 3.На сколько видов делится программное обеспечение? 4.Что такое операционная система? Сор...
129697113 129697113  16.10.2020 12:47
10. Смоделируйте в электронной таблице процесс определения Силы тока (1) по закону Ома |=U/R, где U – напряжение, а R – сопротивление. Напишите формулу для вычисления, используя...
vuhopen vuhopen  01.04.2021 09:00
Як описати масив а з цілих 25 чисел...
Flashvinchester Flashvinchester  01.04.2021 09:00
У змінній letters міститься список [ a , b , c , d ]. Яке значення виразу letters[-1]?...
olyapcomplex olyapcomplex  01.04.2021 09:01
Як буде виглядати список, який зберігається у змінній metering = [3.14, inch , 2.54, inch , True], після виконання команди metering.append(99)?...
прждлшеджж прждлшеджж  01.04.2021 09:02
Напишите программу в чертежнике кумир...
Тер32 Тер32  01.04.2021 09:04
У змінній metering міститься список [3.14, inch , 2.54, inch , True]. Яке значення виразу metering.index( inch )?...
Мелочь83 Мелочь83  29.08.2019 12:50
Царевна лягушка съедает ежедневно на 20% комаров больше ,чем в предыдущий день, и еще два комара. написать программу ,определяющую,сколько комаров она съест на 10й день ,если...

Популярные вопросы