Вопрос:

Прошу, ребят.. В ПАСКАЛЕЕЕЕ
Составьте программу, находящую из трех чисел X, Y, Z наибольшее.
Сначала выбрать наибольшее число из двух – X, Y и присвоить полученное значение переменной С, затем выбрать наибольшее из чисел С и Z и присвоить полученное значение переменной C

Информатика

admin 19.05.2023 33

Ответ учителя:

var x,y,z,c: integer;
begin
write('x, y, z:');
readln(x,y,z);
if x>y then c:=x else c:=y;
if z>c then c:=z;
writeln('c = ',c);
end.

Пример:
x, y, z:
5 8 4
c = 8

Другие вопросы

Создать вопрос

# 2 не получается сделать программу в ABCпаскаль, в чем ошибка? uses crt; var a: array [1..20] of index; begin for i:= 1 to 15 do; readln(a[i]); for i:= 1 to 15 do; writeln(a[i]); for i:= 1 to 15 do; if a[i] mod 2 = 0 then S:=S+1; S:= S+a[i]; writeln(S); end.

# 3 Program Primer, var a, s: integer, begin S:= 0; readln(a); while a<>0 do begin if (a mod 4 = 0) and (a mod 10 = 4) then S:= S +a; readln(a); end; writeln(s); end. Какое число получится, если ввести ряд чисел 80, 12, 164, 104, 11,0? (помогите пожалуйста)

# 4 информатика, язык программирования питон. напишите программу, которая спрашивает возраст человека и, если ему 18 лет и больше, сообщает “Замечательно. Вы уже можете водить автомобиль”, а в противном случае – “К сожалению, водить автомобиль Вам рановато”

# 5 Срочно, решите, пожалуйста!!! Иван составляет пяти-буквенные слова из букв:и, в, а, н. Буквы в слове могут повторяться, использовать все буквы не обязательно, но букву «и» нужно Использовать хотя бы один раз. Сколько различных слов может составить Иван?

Вопрос:

Ответ учителя:

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