Поделитесь своими знаниями, ответьте на вопрос:
Вопрос №1 ? Для вывода значения переменной используют функцию . input () type () fd () print () Вопрос №2 ? Сколько километров пройдет человек за 2 ч. 15 мин, если идти со скоростью 5, 5 км / ч? S = 12.375 S = 13.375 S = 12 S = 12.373 Вопрос №3 ? Чему будет равняться результат выполнения данной программы? a_max = 16 b_max = 34 S_max = 544 a_max = 24 b_max = 26 S_max = 624 a_max = 21 b_max = 29 S_max = 609 a_max = 25 b_max = 25 S_max = 625 Вопрос №4 ? Чему будет равняться значения ширины и длины участка с наибольшей площадью? a = 14 b = 72 a = 25 b = 50 a = 43 b = 14 a = 14 b = 72 Вопрос №5 ? Команда у = int (x) . превращает целые числа в дробные превращает текстовую переменную х на дробную переменную у отсутствует правильный ответ превращает текстовую переменную х в целочисленную переменную у Вопрос №6 ? Команда у = float (x превращает текстовую переменную х на дробную переменную у отсутствует правильный ответ превращает текстовую переменную х в целочисленную переменную у превращает целые числа в дробные
Program zadacha;
Var x:integer;
Begin
Randomize;
x:=random(9999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999)+1000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000;
If (x mod 3=0) then begin
If (x mod 9=0) then writeln('Делится на 3 и на 9);
End;
If (x mod 3=0) then begin
If (x mod 9>0) then writeln('Делится только на 3);
End;
If (x mod 9=0) then begin
If(x mod 3>0) then writeln('Делится только на 9);
End;
End.
P.S. Вы уверены, что СТОзначное число?