Занятие 1. Ввод-вывод, арифметические операции Задача «Сумма трёх чисел»

Вот так, даже не знаешь, какой язык изучаешь? Держи задачу на Pascal.

Program symma;
var
   i, a,  s: integer;
begin

   s:=0;
   for i:=1 to 3 do
     begin
     write('введите число');
     readln(a);
     s:=s+a;
   end;

writeln('s=',s);

end.