Домашние задания: Информатика

Помогите пожалуйста срочно! Эту тему абсолютно не понимаю. Сделать задание нужно в паскале.

С клавиатуры вводятся три числа а, b, c и число Х. Найти значение К таким образом, если все они меньше числа Х, то их сумму умножить на Х, иначе сложить числа а, b, c и Х
Сергей Слютенко
Сергей Слютенко
161
Program P1;
uses crt;
var a, b, c, K, X: real;
begin
clrscr;
write ('Введите число a. a=');
readln (a);
write ('Введите число b. b=');
readln (b);
write ('Введите число c. c=');
readln (c);
write ('Введите число X. X=');
readln (X);
if (a<X) and (b<X) and (c<X) then K:=(a+b+c)*X else K:=a+b+c+X;
write ('K=', K);
readkey;
end.
ВС
Венера Сайфутдинова
43 548
Лучший ответ
Сергей Слютенко спасибо огромное!
Венера Сайфутдинова Давайте даже поясню подробно:
Program P1 - название программы - писАть необязательно всю строку, но, по правилам хорошего тона, лучше написАть. Название может быть любым. Т. е. главное - слово Program - а дальше - начиная с латинской буквы любое название
uses crt - подключение модуля окна, текстового экрана и клавиатуры
var - описание используемых переменных, их типа. В данном случае - real (т. к. я считаю его наиболее универсальным из всех - т. е. я предположил, что могут быть получены дробные значения)
begin - собственно, начало выполнения кода
clrscr - очистка экрана от лишней ненужной информации а-ля версии Паскаля (хоть, конечно, лишнюю информацию пишет только Turbo Pascal, и хоть писАть эту команду необязательно, все же это - признак хорошего тона программиста.
Мало места позже продолжу
a,b,c 90 37 44
proizv
21
3076920
==================
a,b,c 48 6 28
proizv
19
153216
==================
a,b,c 87 98 50
proizv
83
3.53829E+07
==================
a,b,c 28 79 24
proizv
39
2070432
==================
a,b,c 45 98 75
proizv
85
2.811375E+07
==================
a,b,c 31 11 52
proizv
31
549692
==================
a,b,c 68 13 31
proizv
64
1753856
==================
a,b,c 43 88 31
proizv
15
1759560
==================
a,b,c 26 13 53
summa * x
75
6900
==================
a,b,c 89 56 60
proizv
78
2.332512E+07
==================
a,b,c 4 89 48
proizv
76
1298688
==================
a,b,c 33 44 85
proizv
81
9997020
==================
a,b,c 43 10 25
summa * x
73
5694
==================
a,b,c 34 87 67
proizv
52
1.030567E+07
==================
a,b,c 7 74 15
proizv
9
69930
==================
a,b,c 88 11 86
proizv
77
6410096
==================
a,b,c 25 17 43
summa * x
100
8500
==================
a,b,c 40 53 20
proizv
43
1823200
==================
a,b,c 89 81 34
proizv
36
8823816
==================
a,b,c 67 37 19
proizv
45
2119545
==================
a,b,c 27 2 10
summa * x
33
1287
==================
a,b,c 95 19 21
proizv
39
1478295
==================
a,b,c 42 65 52
proizv
65
9227400
==================
a,b,c 23 3 21
summa * x
41
1927
==================
a,b,c 33 69 60
proizv
33
4508460
==================
a,b,c 98 4 88
proizv
72
2483712
==================
a,b,c 71 91 36
proizv
30
6977880
==================
a,b,c 99 47 70
proizv
43
1.400553E+07
==================
a,b,c 9 13 10
summa * x
34
1088
==================
a,b,c 50 90 4
proizv
9
162000
==================
a,b,c 47 35 86
proizv
31
4385570
==================
a,b,c 52 32 89
proizv
72
1.066291E+07
==================
a,b,c 12 98 77
proizv
67
6066984
==================
a,b,c 80 15 88
proizv
73
7708800
==================
Виктор Вендерович
Виктор Вендерович
42 631

Похожие вопросы