Информатика 8 клас створити алгоритм для знаходження суми додатних елементив ряда чисел 201,197,193 (кожне наступне число менше 4) Реализувати в середовище Pascal ABC

укрытся одеялом и лечь спать,   и пить лекартва и остаться дома

program p_1

var

a: string

begin

writeln ('vvedite nazvanie rek');

read (a);

if (a='волга,днепро,нёман,енисей')then

writeln ('в беларуси протекают только днепро,нёман');

end.

20-25=-5                                                                                   

р треугольника= сложить все стороны