Напишите программу для решения примера а=в/с, при условии, что ,с, не равно нулю

begin

  var (b, c) : = readreal2;

  if c < > 0 then write('a=', b / c)

  else print('с=0')

end.

var a, b, c: integer;

begin

read(b,c);

if (c> 0)and(c< 0) then a: =b/c write(a) else write('c=0');

end.

это для паскаля

а-1; мама-4; весна-5 - количество букв

а-1; шея-2; мама-2; огурец-3 - количество гласных

а-0; шея-1; мама-2; огурец-3 - количество согласных

1)

германия берлин

греция афины

испания мадрид

польша варшава

франция париж

2)

греция афины

германия берлин

польша варшава

испания мадрид

франция париж