Помогите по информатике Нужно составить программу в паскале Номер 54 (7)

0 голосов
84 просмотров

Помогите по информатике
Нужно составить программу в паскале
Номер 54 (7)


image

Информатика Начинающий (101 баллов) | 84 просмотров
Дан 1 ответ
0 голосов

Var a, b, c:real; d:boolean;
Begin
Readln(a, b, c);
If (a=c) then d:=true
Else d:=false;
End.

Одаренный (4.0k баллов)
10,984,878 вопросов
13,471,016 ответов
8,518,553 комментариев
4,909,216 пользователей