Урок 7 задача 1

Урок 7 задача 1

Объявите три переменные типа char, присвойте им значения и выведите эти значения на экран:
одним вызовов write (все три) -- т.е. передав несколько аргументов.
отдельно вызывая writeln для вывод значения каждой переменной

1

program Project1;
var a,b,c: char;
begin
  a := '2';
  b := '3';
  c := '4';
  write('a''''b''''c')

end.              

2

program Project1;
var a,b,c: char;
begin
  a := '2';
  b := '3';
  c := '4';
  writeln('a')
  writeln('b')
  writeln('c')

end.