Новые сообщения · Правила  
  • Страница 1 из 1
  • 1
Модератор форума: Berestovskiy  
Паскаль
Найти сумму любых 3 чисел. Составить программу
1 | Автор: eguarkozlov | 2013-10-22, 21:40   |  Репутация: [ + 0 ]
var
a, b, c, sum:real;
begin
read(a, b, c);
sum:=a+b+c;
writeln(sum);
end.


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2013-10-23, 09:08   |  Репутация: [ + 211 ]
  • Страница 1 из 1
  • 1
Поиск: