Одна тонкость - разность первых 2-ух чисел это из первого вычитаем второе или из второго первое?
Program Chisla;
Uses Crt;
var a,b,c,d,sum:real;
begin
clrscr;
write('Введите первое число: ');
readln(a);
write('Введите второе число: ');
readln(b);
write('Введите третье число: ');
readln(c);
write('Введите четвёртое число: ');
readln(d);
sum:=a+b+c+d;
if ((a-b)>d) and (sum<=80) then writeln(c,d)
else
if (a-b)>d then writeln(a,b,c,d)
else
if (sum<=80) then writeln(a,b)
else writeln(a+5,b+5,c+5,d+5);
readkey;
end.
Псевдокод :
Начало
объявление целых переменных a и b
ввод a,b
вывод a+b
вывод a*b
Конец
c# :
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace _1
{
class Program
{
static void Main(string[] args)
{
Console.Write("Число a : ");
int a = int.Parse(Console.ReadLine());
Console.Write("Число b : ");
int b = int.Parse(Console.ReadLine());
Console.WriteLine("Сумма чисел a и b : {0}",a+b);
Console.WriteLine("Произведение чисел a и b : {0}", a*b);
Console.ReadKey();
}
}
}
PascalABC :
var
a,b:integer;
Begin
readln(a,b);
writeln(a+b);
writeln(a*b);
End.
