Регистрация
Ilyakuhs228
23.06.2020 05:37
Информатика
Есть ответ 👍

Водится 2 числа, вывести сумму цифр первого, если оно больше второго и произведение четных цифр второго числа в противном случае(pascal)

261
386
Посмотреть ответы 2

Ответы на вопрос:

Василиса73
Василиса73
4,8(87 оценок)
Var s,a,b: integer; p: real; begin     readln(a,b); p: =1; s: =0;       if a> b then         begin           while abs(a)> 0 do                 begin                     s: =s+(abs(a) mod 10);                     a: =a div 10;                 end;             writeln('s =  ',s)           end       else           begin               while abs(b)> 0 do                   begin                     p: =p*(abs(b) mod 10);                     b: =b div 10;                   end;               writeln('p =  ',p: 4: 2);           end; end.                    
PoliShka18
PoliShka18
4,7(26 оценок)

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

#include <iostream>

using namespace std;

 

int main()

{   setlocale (LC_ALL, "Russian");

   int feets;

   int duyms;

   int funt;

   cout << "Введите рост в футах и дюймах ";

   cin >> feets;

   cin >> duyms;

   cout << "ВВедите вес тела в фунтах ";

   cin >> funt;

   const int duym = 12;

   const double metr = 0.0254;

   const double kilo = 2.2;

   int Duyms = feets*duym+duyms;

   int meters = Duyms*0.0254;

   int Kilogramm = funt/kilo;

   double BMI = Kilogramm /(meters*meters);

   cout <<"Ваш BMI равен: " << BMI;

   return 0;

   

}

Объяснение:

на C ++

Популярно: Информатика