Нужна помощь по Pascal abc . Нужна программа , которая сравнит два введенных числа и...

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

Нужна помощь по Pascal abc . Нужна программа , которая сравнит два введенных числа и напишет , какое больше .


Информатика (17 баллов) | 31 просмотров
Дано ответов: 2
0 голосов
Правильный ответ

// PascalABC.Net
var
  a,b:integer;
begin
  Write('Введите через пробел числа а и b: '); Read(a,b);
  if a=b then Writeln('Числа равны')
  else
    if a>b then Writeln(a,'>',b)
    else Writeln(a,'<',b)<br>end.

(142k баллов)
0 голосов

 
Всё довольно просто, держи:


 program WhatAreMoreHere;  var    a,b:integer;   begin  writeln(); writeln(' Введите первое число: '); readln(a);  writeln(); writeln(' Введите второе число: '); readln(b);  if (a=b) then  writeln(' Число ', a, ' = ', b, '.');   if (a>b) then  writeln(' Число ', a, ' больше чем число ', b, '.');   if (b>a) then  writeln(' Число ', b, ' больше чем число ', a, '.');   end.

(581 баллов)
0

Спасибо ! Только начинаю изучать самостоятельно ...